%I#25 2022年9月8日08:45:38
%S 1,1,2,5,5,13,29877,23,534639226192423276443718009371101959,
%电话:4348606725575577150063992225274326209287188633574631,
%电话:13369534669120445763157171659117598832248092479031171572636187431516743833
%N第N个贝尔数A000110(N)的最大素数因子(如果A000110,N)=1,则为1)。
%C来自David Pasino,2008年12月3日:(开始)
%分区的细化次数是单元大小的贝尔数的乘积。
%C编码数是细胞数的贝尔数。
%为了使这些相等,贝尔数必须是贝尔数的乘积。
%如果有n-1个单元素细胞和1个n-元素细胞,就会发生这种情况。
%C是否曾经发生过其他情况?(结束)
%H Amiram Eldar,n表,n=0..104的a(n)
%H西蒙·普劳夫,<a href=“http://plouffe.fr/simon/constants/factors_of_bell_numbers.txt“>贝尔数的因素</a>[_David Pasino_,2008年12月3日]
%H Prime-Numbers.org,<a href=“网址:http://www.prime-numbers.org/“>最多10000000000个质数检查器</a>[_David Pasino_,2008年12月3日]
%t连接[{1},表[FactorInteger[BellB[n]][[-1,1]],{n,40}]](*_Winenzo Librandi_,2017年1月4日*)
%o(Magma)[1,1]cat[最大值(PrimeDivisors(Bell(n))):n in[2..30]];//_Vincenzo Librandi_,2017年1月4日
%K nonn公司
%0、3
%A _N.J.A.Sloane,2008年12月3日
%E a(15)-a(20)摘自David Pasino,2008年12月3日
%2008年12月4日,N·J.a.Sloane起,E a(21)
%E由_David Pasino修正,2008年12月14日
|