%我#70 2023年10月27日19:42:27

%S 1,1,1,1,2,2,2,1,5,1,2,3,1,4,1,4,3,2,7,3,2,4,1,7,1,6,3,2，

%温度5,8,1,2,3,9,1,6,1,4,10,2,1,1,4,6,3,4,1,8,5,9,3,2,1,14,12,10,5,6，

%U 1,4,3,11,17,12,9,4,7,6,1,19,10,2,1,13,5,2,3,8,1,21

%N a（1）=1；对于n>1，a（n）是由n^a（n）除以n！但n^（a（n）+1）没有。

%C From _Stefano Spezia_，2018年11月8日：（开始）

%C当n=4或素数时，a（n）=1（参见A175787）。

%C A074845中n的a（n）=2。（结束）

%D Ivan Niven、Herbert S.Zuckerman和Hugh L.Montgomery，《数字理论导论》，第五版，John Wiley and Sons，Inc.，纽约，1991年。

%D J.Roberts，《整数的诱惑》，数学。美国协会，1992年，第251页。

%H Alois P.Heinz，n的表格，n=1..100000的a（n）（T.D.Noe的术语1..1000）

%H P.Shui，<a href=“http://www.jstor.org/stable/40378569“>关于n变为n的次数的脚注！</A>，《数学公报》93:528（2009），第492-495页。

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/Factorial.html“>阶乘</a>

%H<a href=“/index/Fa#factorial”>与阶乘数相关的序列的索引项</a>

%e12^5除以12！但12^6不等于a（12）=5。

%p a：=[]；对于从2到200的n，i：=0：而n！mod n ^i=0 do i：=i+1：od：a：=[op（a），i-1]；od:a；

%p#第二个Maple程序：

%p f:=proc（n，p）局部c，k；c、 k:=0，p；

%当n>=k时，p做c：=c+iquo（n，k）；k： =k*p od；c（c）

%p端：

%pa:=n->min（seq（iquo（f（n，i[1]），i[2]），i=ifactors（n）[2]））：a（1）：=1:

%p序列（a（n），n=1..100）；#_Alois P.Heinz，2012年10月4日

%t Do[m=1；While[IntegerQ[n！/n^m]，m++]；打印[m-1]，{n，1，100}]

%t最高功率[n_，p_]：=模块[{r，s=0，k=1}，而[r=楼层[n/p^k]；r> 0，s=s+r；k++]；s] ；集合属性[HighestPower，Listable]；连接[{1}，表[{p，e}=Transpose[FactorInteger[n]]；Min[楼层[最高功率[n，p]/e]]，{n，2100}]]（*_T.D.Noe_，2008年10月1日*）

%t连接[{1}，表[IntegerExponent[n！，n]，{n，2500}]]（*_Vladimir Joseph Stephan Orlovsky_，2010年12月26日*）

%tf[n_，p_]：=模[{c=0，k=p}，而[n>=k，c=c+商[n，k]；k=k*p]；c] ；a[1]=1；a[n_]：=Min[Table[商[f[n，i[[1]]]，i[[2]]]，{i，FactorInteger[n]}]]；表[a[n]，{n，1100}]（*_Jean-François Alcover_，2013年10月3日，在_Alois P.Heinz的Maple计划之后*）

%o（哈斯克尔）

%o a011776 1=1

%o a011776 n=长度$

%o takeWhile（（==0）。（mod（a000142 n））$迭代（*n）n

%o——Reinhard Zumkeller，2012年9月1日

%o（PARI）a（n）=估价（n！，n）\\-Charles R Greathouse IV_，2014年4月10日

%o（PARI）vp（n，p）=我的（s）；而（n＝p，s＋＝n）；秒

%o a（n）=如果（n==1，返回（1））；my（f=系数（n））；vecmin（矢量（#f~，i，vp（n，f[i，1]）\f[i，2]））\\_Charles R Greathouse IV_，2014年4月10日

%Y参见A011777、A011778、A133481、A000142、A074845。

%A090622的Y对角线。

%Y参考A175787（底漆和4）。

%K nonn，简单，看，很好

%O 1,6型

%A _罗伯特·G·威尔逊v_