%I#29 2021年12月21日23:33:12
%S 1,1,2,1,3,1,4,1,2,5,1,6,3,4,1,1,7,2,8,3,5,6,9,1,3,7,2,4,10,11,1,8,
%电话:9,10,12,11,12,2,13,2,14,5,6,13,15,14,7,14,8,16,3,15,4,16,17,1,
%U 18,18,9,1,19,3,19,10,20,4,20,12,1,21,11,12,22,52,2,2,23,23,2,24,25,26号机组
%列出仅以每一个新的最小素数签名(A025487)开始新行的自然数。a(n)是与n相关联的列位置。
%C行2记录素数(A000040)。第3行和第4行记录了半素数(A001358)。第5、6和9行记录了3-几乎素数(A014612)等。A058933是基于k-几乎素数的类似序列。
%这个序列的图对于大n来说很有趣,因为它显示了多条曲线,每条曲线对应一个素数签名。例如,图中n到10^4的a(n)的六条最高曲线是(1,1)、(1,1,1),(1)、“(2,1,1)”、“(2,1)”和“(1,1,1,1)”素数签名。在n=58之前,(1)曲线占主导地位;(1,1)曲线占主导地位,直到n=1279786,此时(1,1,1)曲线与(1,1)曲线相交。每条{1,1,…,1)曲线支配有限数量的n。
%C A101296的顺序变换_Antti Karttunen,2017年5月15日
%C a(n)是与n具有相同素数签名的最大为n的正整数的数目。例如,a(20)=3个数字是{12,18,20}_Gus Wiseman_,2019年7月8日
%C A046523的顺序变换_阿洛伊斯·海因茨,2020年5月31日
%H T.D.Noe,n的表格,n=1..10000的a(n)</a>
%e列表开头如下:
%e 1个
%e 2 3 5 7 11 13 19 23 29 31 37 41 43 47 53。。。
%e 4 9 25 49。。。
%e 6 10 14 15 21 22 33 34 35 38 46 51。。。
%e 8 27。。。
%e 12 18 20 28 44 45 50 52。。。
%e 16。。。
%e注意:上面的数组,没有初始值1,由A095904(及其转置A179216)给出。-_Antti Karttunen,2017年5月15日
%p p:=proc()0结束:
%p a:=proc(n)选项记忆;局部t;a(n-1);
%p t:=(l->mul(i)^l[i],i=1..nops(l))(
%p排序(映射(i->i[2],ifactors(n)[2]),`>`));
%p p(t):=p(t)+1
%p端:a(0):=0:
%p序列(a(n),n=1..100);#_阿洛伊斯·海因茨,2020年5月31日
%t prisig[n_]:=如果[n==1,{},排序[Last/@FactorInteger[n]]];
%t表[计数[数组[prisig,n],prisig[n]],{n,30}](*_Gus Wiseman_,2019年7月8日*)
%Y参见A000040、A001358、A014612、A025487、A046523、A058933、A101296。
%Y参考数组A095904、A179216。
%Y参见A001222、A085089、A118914、A124010、A325263、A325365、A326438、A32643。
%放松,好,不
%氧1,3
%A Alford Arnold,2001年10月24日
%E Nomoto的更多条款,2001年10月31日
|