搜索: a178740-编号:a178740
|
|
|
|
1, 2, 2, 3, 2, 4, 2, 5, 3, 4, 2, 6, 2, 4, 4, 7, 2, 6, 2, 6, 4, 4, 2, 8, 3, 4, 5, 6, 2, 9, 2, 10, 4, 4, 4, 11, 2, 4, 4, 8, 2, 9, 2, 6, 6, 4, 2, 12, 3, 6, 4, 6, 2, 8, 4, 8, 4, 4, 2, 13, 2, 4, 6, 14, 4, 9, 2, 6, 4, 9, 2, 15, 2, 4, 6, 6, 4, 9, 2, 12, 7, 4, 2, 13, 4, 4, 4, 8, 2, 13, 4, 6, 4, 4, 4, 16, 2, 6, 6, 11, 2, 9, 2, 8, 9, 4, 2, 15, 2, 9, 4, 12, 2, 9, 4, 6, 6, 4, 4, 17
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
因此,这个序列(而不是A046523号)可用于查找a(n)的值仅依赖于n的素数签名的序列,即仅依赖n的因式分解中素数指数的多集。(End)
|
|
链接
|
|
|
配方奶粉
|
(结束)
|
|
例子
|
1有素数签名(),这是第一个不同的素数签名。因此,a(1)=1。
2具有素数签名(1),即(1)之后的第二个不同素数签名。因此,a(2)=2。
3有素数签名(1),2也是。因此,a(3)=a(2)=2。
4有素数签名(2),在()和(1)之后是第三个不同的素数签名。因此,a(4)=3。(结束)
对于n=2,A046523号(2) =2,这在(第一素数)之前是没有遇到过的,因此我们为(2)分配了迄今为止未使用的最少的数字,即2,因此a(2)=2。
对于n=4,A046523(4) =4,在(素数的第一个平方)之前没有遇到,因此我们为(4)分配到目前为止未使用的最少的数字,即3,因此a(4)=3。
对于n=5,A046523(5) =2,因为在n=2时第一次遇到,所以我们设置a(5)=a(2)=2。
对于n=6,A046523号(6) =6,之前没有遇到过(第一个半素数pq具有不同的p和q),因此我们为(6)分配了迄今为止未使用的最少的数字,即4,因此a(6)=4。
对于n=8,A046523号(8) =8,在(素数的第一个立方体)之前没有遇到,因此我们为(8)分配到目前为止未使用的最少的数字,即5,因此a(8)=5。
对于n=9,A046523号(9) =4,与n=4时第一次遇到的情况一样,因此a(9)=3。
(结束)
计算序列的算法的(粗略)描述:
假设我们想计算[1..20]中n的a(n)。
我们设置了一个由20个元素组成的向量,值为0,数字m=1,这是我们尚未检查的最小值,c=0是我们迄今为止发现的不同素数签名的数量。
[0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
我们检查m的素数签名,看它是()。我们用1增加c,并将所有元素设为20,素数签名()设为1。在此过程中,我们调整了m。这得出:
[1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]. 我们没有检查的最小值是m=2。2具有质数签名(1)。我们用1增加c,并将所有元素设为20,素数签名(1)设为2。在此过程中,我们调整了m。这得出:
[1, 2, 2, 0, 2, 0, 2, 0, 0, 0, 2, 0, 2, 0, 0, 0, 2, 0, 2, 0]
我们检查m=4的素数签名,发现其素数签名是(2)。我们用1增加c,并用素数签名(2)将所有数字设为20,设为3。这提供了:
[1, 2, 2, 3, 2, 0, 2, 0, 3, 0, 2, 0, 2, 0, 0, 0, 2, 0, 2, 0]
类似地,在m=6之后,我们得到
[1,2,2,3,2,4,2,0,3,4,2,2,0,2,4,1,4,4,0,2,0],在m=8之后,我们得到:
[1,2,2,3,2,4,2,5,3,4,2,0,2,4,4,0,2,0],在m=12之后,我们得到:
[1,2,2,3,2,4,2,5,3,4,2,6,2,4,4,0,2,6,2,0],在m=16之后,我们得到:
[1,2,2,3,2,4,2,5,3,4,2,6,2,4,4,7,2,6,2,0],在m=20之后,我们得到:
[1,2,2,3,2,4,2,5,3,4,2,6,2,4,4,7,2,6,2,8]。现在,m>20,所以我们停止。(结束)
上述方法效率低下,因为步骤“将所有元素a(n)设置为n=Nmax,素数签名s(n)=s[c]设置为c”需要将所有整数分解为Nmax(或至少将其签名计算后与s[c]进行比较)。在每m=1..Nmax上只运行一次,计算它的素数签名s(m),将它与它的“秩”(=列表的新大小)一起添加到有序列表中,并将该秩赋给a(m)会更有效。素数签名列表比[1..Nmax]短得多。还可以使用m’(m):=带m素数签名的最小n(计算速度快于搜索签名)作为s(m)的代表,并设置a(m):=a(m’(m))。那么,除了要计算的序列之外,只需要一个计数器(到目前为止看到的素数签名数)作为辅助变量就足够了-M.F.哈斯勒2019年7月18日
|
|
MAPLE公司
|
当地a046523,a;
对于1 do
返回a;
返回-1;
结束条件:;
结束do:
|
|
数学
|
带有[{nn=120},函数[s,表[Position[按键@s,k_/;MemberQ[k,n]][[1,1]],{n,nn}]]@Map[#1->#2&@@#&,Transpose@{Values@#,Keys@#}]&@PositionIndex@Table[Times@@MapIndexed[Prime[First@#2]^#1&,Sort[FactorInteger[n][[All,-1]],Greater]]-Boole[n==1],{n,nn}](*迈克尔·德弗利格,2017年5月12日,第10版*)
|
|
程序
|
(PARI)查找(ps,vps)={for(k=1,#vps,if(vps[k]==ps,return(k)););}
lisps(nn)={vps=[];对于(n=1,nn,ps=vecsort(factor(n)[,2]));ips=find(ps,vps);如果(!ips,vps=concat(vps,ps);ips=#vps),print1(ips,“,”);}\\米歇尔·马库斯2015年11月15日;编辑人M.F.哈斯勒2019年7月16日
(PARI)
rgs_transform(invec)={my(occurrences=Map(),outvec=vector(length(invec)),u=1);对于(i=1,length,invec,if(mapisdefined(occurements,invec[i]),my(pp=mapget(occursions,invec[i];
write_to_bfile(start_offset,vec,bfilename)={对于(n=1,长度(vec),write(bfilename,(n+start_offset)-1,“”,vec[n]);}
写入to_b文件(1,rgs_transform(向量(100000,n,A046523号(n) ),“b101296.txt”);
|
|
交叉参考
|
由该序列获得的值确定的等价类的有限个(>=2)的并集序列(即大卫·A·科内斯2017年5月12日配方奶粉):A001358号(A001248号U型A006881号,值3和4),A007422号(值1、4、5),A007964号(2, 3, 4, 5),A014612号(5, 6, 9),A030513型(4, 5),A037143号(1, 2, 3, 4),A037144号(1, 2, 3, 4, 5, 6, 9),A080258号(6, 7),A084116号(2, 4, 5),A167171号(2, 4),A217856型(6, 9).
|
|
关键词
|
容易的,非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|
|
|
|
|
|
|
60, 72, 84, 90, 96, 108, 126, 132, 140, 150, 156, 160, 198, 200, 204, 220, 224, 228, 234, 260, 276, 294, 306, 308, 315, 340, 342, 348, 350, 352, 364, 372, 380, 392, 414, 416, 444, 460, 476, 486, 490, 492, 495, 500, 516, 522, 525, 532, 544, 550
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
链接
|
|
|
数学
|
选择[Range[600],Length[Divisors[#]]==12&](*斯特凡·斯坦纳伯格,2006年4月10日*)
选择[范围[600],除数西格玛[0,#]==12&](*哈维·P·戴尔2016年6月1日*)
|
|
程序
|
(PARI)对于(n=1,1e3,如果(numdiv(n)==12,打印1(n,“,”))\\阿尔图·阿尔坎2015年11月11日
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
|
|
144, 324, 400, 784, 1936, 2025, 2500, 2704, 3969, 4624, 5625, 5776, 8464, 9604, 9801, 13456, 13689, 15376, 21609, 21904, 23409, 26896, 29241, 29584, 30625, 35344, 42849, 44944, 55696, 58564, 59536, 60025, 68121, 71824, 75625, 77841
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
链接
|
|
|
配方奶粉
|
|
|
数学
|
f[n_]:=排序[Last/@FactorInteger[n]]=={2,4};选择[范围[150000],f]
模块[{上限=80000},选择[Union[Flatten[{#[[1]]^2#[[2]]^4,#[[1]]^4#[[2]]^2}和/@子集[Prime[Range[Sqrt[upto/16]]],{2}]],#<=上限&]](*哈维·P·戴尔2017年12月15日*)
|
|
程序
|
(PARI)列表(lim)=my(v=list(),t);对于素数(p=2,(lim\4)^(1/4),t=p^4;对于素数(q=2,sqrt(lim\t)),如果(p==q,next);列表(v,t*q^2));向量排序(Vec(v))\\查尔斯·格里特豪斯四世2011年7月20日
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
A255231型
|
| 因子分解数n=Product_i b_i^e_i,其中所有基b_i是不同的,所有指数e_i是不同的>=1。 |
|
+10 9
|
|
|
1, 1, 1, 2, 1, 1, 1, 2, 2, 1, 1, 2, 1, 1, 1, 4, 1, 2, 1, 2, 1, 1, 1, 3, 2, 1, 2, 2, 1, 1, 1, 5, 1, 1, 1, 4, 1, 1, 1, 3, 1, 1, 1, 2, 2, 1, 1, 5, 2, 2, 1, 2, 1, 3, 1, 3, 1, 1, 1, 2, 1, 1, 2, 7, 1, 1, 1, 2, 1, 1, 1, 6, 1, 1, 2, 2, 1, 1, 1, 5, 4, 1, 1, 2, 1, 1, 1, 3, 1, 2, 1, 2, 1, 1, 1, 6, 1, 2, 2, 4, 1, 1, 1, 3, 1, 1, 1, 6, 1, 1, 1, 5, 1, 1, 1, 2, 2, 1, 1, 3
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4
|
|
评论
|
非乘法:a(48)=a(2^4*3)=5<>a(2*4)*a(3)=4*1=4-R.J.马塔尔2016年11月5日
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
a(4)=2:4^1=2^2。
a(8)=2:8^1=2^3。
a(9)=2:9^1=3^2。
a(12)=2:12^1=2^2*3^1。
a(16)=4:16^1=4^2=2^2*4^1=2^4。
a(18)=2:18^1=2*3^2。
a(20)=2:20^1=2^2*5^1。
a(24)=3:24^1=2^2*6^1=2 ^3*3^1。
a(32)=5:32^1=2^1*4^2=2^2*8^1=2 ^3*4^1=2,5。
a(36)=4:36^1=6^2=3^2*4^1=2^2*9^1。
a(48)=5:48^1=3^1*4^2=2^2*12^1=2^3*6^1=2 ^4*3^1。
a(60)=2:60^1=2^2*15^1。
a(64)=7:64^1=8^2=4^3=2^2*16^1=2^3*8^1=2 ^4*4^1=2A^6。
a(72)=6:72^1=3^2*8^1=2^1*6^2=2^2*18^1=2^3*9^1=2 ^3*3^2。
(结束)
|
|
MAPLE公司
|
#如果n=dvs_i^exps(i)其中i=1..pividx固定,则计算产品的解决方案
Apiv:=进程(n,dvs,exps,pividx)
本地dvscnt、expscopy、i、a、expsrt、e;
dvscnt:=nops(dvs);
a:=0;
如果pividx>dvscnt,则
#已用尽指数列表:递归的离开
#检查dvs_i^exps(i)是否为表示
如果n=mul(op(i,dvs)^op(i、exps),i=1..dvscnt),则
#构造非0指数列表
导出:=[];
为我从1到dvscnt做
如果op(i,exps)>0,则
expsrt:=[操作(expsrt),操作(i,exps)];
结束条件:;
结束do;
#检查列表是否无重复
如果nops(expsrt)=nops(convert(expsrt,set)),则
返回1;
其他的
返回0;
结束条件:;
其他的
返回0;
结束条件:;
结束条件:;
#需要列表的本地副本才能修改它
检验:=[];
对于i从1到nops(exps)do
expscope:=[操作(expscope),操作(i,exps)];
结束do:
#循环所有分配给列表中下一个基数的指数。
从0到e do
candf:=op(pividx,dvs)^e;
如果modp(n,candf)<>0,则
断裂;
结束条件:;
#将e指定给指数的本地副本
expscopy:=下层(pividx=e,expscopy);
a:=a+程序名(n,dvs,expscopy,pividx+1);
结束do:
返回a;
结束进程:
本地dvs、dvscnt、exps;
如果n=1,则
返回1;
结束条件:;
#除1外,候选基数都是除数
dvs:=转换(数字[除数](n)减去{1},列表);
dvscnt:=nops(dvs);
#指数列表从all 0开始,为
#递归增加
经验:=[seq(0,e=1..dvscnt)];
#取dvs的任意子集作为基数,即向上的指数0
Apiv(n,dvs,exps,1);
结束进程:
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|
|
|
|
|
175387英镑
|
| n的除数d<e的有序对的数目,使得gcd(d,e)>1。 |
|
+10 5
|
|
|
0, 0, 0, 1, 0, 2, 0, 3, 1, 2, 0, 8, 0, 2, 2, 6, 0, 8, 0, 8, 2, 2, 0, 18, 1, 2, 3, 8, 0, 15, 0, 10, 2, 2, 2, 24, 0, 2, 2, 18, 0, 15, 0, 8, 8, 2, 0, 32, 1, 8, 2, 8, 0, 18, 2, 18, 2, 2, 0, 44, 0, 2, 8, 15, 2, 15, 0, 8, 2, 15, 0, 49, 0, 2, 8, 8, 2, 15, 0, 32, 6, 2
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,6
|
|
评论
|
集合{(x,y)中的元素数:x|n,y|n,x<y,gcd(x,y)>1}。
序列中的每个元素都无限重复,例如:
如果n素数,a(n)=0;
如果n在集合中,a(n)=15{A007304型}union{64}={30,42,64,66,70,…}={Sphenic numbers}联合{64};
a(n)=44,如果n正好是四个素数的乘积,其中三个素数是不同的(A085987号);
a(n)=49,如果n的形式为p^2*q^3,其中p,q是不同的素数(143610英镑);
a(n)=98,如果n是素数的七次幂与一个不同素数(p^7*q)的乘积(A179664号);
a(n)=116,如果n是两个完全不同的素数平方和一个不同的素值(p^2*q^2*r)的乘积(A179643号);
a(n)=126,如果n是素数的5次幂与2次幂的不同不同素数的乘积(p^5*q^2)(A179646号);
a(n)=128,如果n是素数的8次幂与不同素数(p^8*q)的乘积(A179668号);
a(n)=150,如果n是一个素数的四次幂与两个不同的素数(p^4*q*r)的乘积(A179644号);
a(n)=159,如果n是素数的4次方和幂3的不同素数(p^4*q^3)的乘积(A179666号).
可以继续使用a(n)=162、178、209、224、227、238、239、260、289、309、320、333,。。。
|
|
链接
|
|
|
配方奶粉
|
a(n)=和{d1|n,d2|n,d1<d2}(1-[gcd(d1,d2)=1]),其中[]是艾弗森括号-韦斯利·伊万·赫特2021年1月1日
|
|
例子
|
a(12)=8,因为12的除数是{1,2,3,4,6,12},对于以下8对除数:(2,4),(2,6),(2.12),(3,6)。
|
|
MAPLE公司
|
其中(数字理论):nn:=100:
对于从1到nn的n,do:
x: =除数(n):n0:=nops(x):it:=0:
对于从1到n0的i,请执行以下操作:
对于从i+1到n0的j,do:
如果gcd(x[i],x[j])>1
然后
它:=它+1:
其他的
图1:
日期:
日期:
printf(`%d,`,it):
日期:
|
|
数学
|
表[Sum[Sum[(1-KroneckerDelta[GCD[i,k],1])(1-天花板[n/k]+地板[n/k])(1-天花板[n/i]+地板[n/i]),{i,k-1}],{k,n}],}n,100}](*韦斯利·伊万·赫特2021年1月1日*)
|
|
程序
|
(PARI)a(n)=my(d=除数(n));总和(i=2,#d,总和(j=1,i-1,gcd(d[i],d[j])>1)\\查尔斯·格里特豪斯四世2016年8月3日
(PARI)a(n)=my(f=系数(n)[,2],t=prod(i=1,#f,f[i]+1));t*(t-1)/2-(prod(i=1,#f,2*f[i]+1)+1)/2\\查尔斯·格里特豪斯四世2016年8月3日
|
|
交叉参考
|
囊性纤维变性。A001248号,A006881号,A007304型,A030078型,A030514型,A030632号,A046386号,A050997型,A054753号,A063647号,A065036号,A066446号,A079395号,A085986美元,A085987号,A092759美元,A143610型,A162142号,A178739号,A178740号,A179644号,A179646号,A179664号,A189975号.
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
A215198型
|
| 数字n使得n和n+1都是p*q^5的形式,其中p和q是不同的素数。 |
|
+10 2
|
|
|
8991, 9375, 335583, 364256, 488672, 535328, 677727, 690848, 755487, 768608, 864351, 908576, 924128, 955232, 1097631, 1377567, 1424223, 1608416, 1688607, 1875231, 2121632, 2124063, 2168288, 2277152, 2541536, 2575071, 2621727, 2901663, 3190624, 3241376, 3409375
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
链接
|
|
|
例子
|
8991是8991=37*3^5和8992=281*2^5的成员。
|
|
MAPLE公司
|
with(numtheory):对于从3到10^7的n,do:x:=系数集(n):y:=系数组(n+1):n1:=nops(x):n2:=nops(y):如果n1=2和n2=2,则xx1:=x[1]*x[2]^5:xx2:=x[2]*x[1]^5:yy1:=y[1]*y[2]^2:yy2:=y[2]*y[1]^5:如果(xx1=n或xx2=n)和(yyyy1=n+1或yy2=n+1),然后打印f(“%a,”,n):否则fi:fi:od:
|
|
数学
|
lst={};Do[f1=FactorInteger[n];如果[Sort[Transpose[f1][[2]]]=={1,5},f2=FactorInteger[n+1];如果[Sort[Transpose[f2][[2]]]=={1,5},AppendTo[lst,n]]],{n,3,10^7}];第一次
SequencePosition[Table[If[Sort[FactorInteger[n][[;;,2]]=={1,5},1,0],{n,341*10^4}],{1,1}][[;,1]](*哈维·P·戴尔2023年11月4日*)
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
|
|
1, 1, -1, -1, -1, 1, -1, 0, 2, -1, 0, 0, 2, -3, 1, -1, 2, 1, -5, 4, -1, 1, -3, 5, -8, 9, -5, 1, -1, 4, -4, -5, 15, -14, 6, -1, 0, -1, 6, -17, 29, -31, 20, -7, 1, 0, 0, 2, -13, 36, -55, 50, -27, 8, -1, 1, -7, 23, -50, 84, -112, 112, -78, 35, -9, 1
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,9
|
|
评论
|
推测:在矩阵大小N的因式分解中,这些特征多项式的特征值的最大绝对值似乎具有相同的素数签名。
换言之:让b(N)等于大小为N的矩阵的特征多项式的特征值的最大绝对值的序列
b(N=1..无穷大)
= 1.00000, 1.61803, 1.61803, 2.00000, 1.61803, 2.20557, 1.61803, 2.32472, 2.00000, 2.20557, 1.61803, 2.67170, 1.61803, 2.20557, 2.20557, 2.61803, 1.61803, 2.67170, 1.61803, 2.67170, 2.20557, 2.20557, 1.61803, 3.08032, 2.00000, 2.20557, 2.32472, 2.67170, 1.61803, 2.93796, 1.61803, 2.89055, 2.20557, 2.20557, 2.20557, 3.21878, 1.61803, 2.20557, 2.20557, 3.08032, 1.61803, 2.93796, 1.61803, 2.67170, 2.67170, 2.20557, 1.61803, 3.45341, 2.00000, 2.67170, 2.20557, 2.67170, 1.61803, 3.08032, 2.20557, 3.08032, 2.20557, 2.20557, 1.61803, 3.53392, 1.61803, 2.20557, 2.67170, ...
然后,对于n=1,2,3,4,5,。。。,无穷大我们有一个表:
主签名:b(Axxxxx(n))=最大abs(特征值):
p^0:b(1)=1.00000000000000000000000000。。。
p:b页(A000040型(n) )=1.6180339887498949025257388711。。。
p^2:b页(A001248号(n) )=2.00000000000000000000000000。。。
p*q:b页(A006881号(n) )=2.2055694304005917238953315973。。。
p^3:b页(A030078型(n) )=2.3247179572447480566665944934。。。
p^2*问题:b(A054753号(n) )=2.6716998816571604358216518448。。。
p^4:b页(A030514型(n) )=2.6180339887498917939012699207。。。
p^3*问题:b(A065036号(n) )=3.080322721490602155824949299。。。
p*q*r:b页(A007304型(n) )=2.9379558827528557962693867011。。。
p^5:b页(A050997型(n) )=2.8905508875432590620846440288。。。
p^2*q^2:b(A085986号(n) )=3.2187765853016649941764626419。。。
p^4*q:b页(A178739号(n) )=3.4534111136673804054453285061。。。
p^2*q*r:b(A085987号(n) )=3.5339198574905377192578725953。。。
p^6:b页(A030516型(n) )=3.1478990357047904043330946587。。。
p^3*q^2:b(A143610型(n) )=3.7022736187975437971431347250。。。
p^5*问题:b(A178740号(n) )=3.8016448153137023524550386355。。。
p^3*q*r:b(A189975号(n) )=4.0600260453688532535920785448。。。
p^7:b页(A092759号(n) )=3.3935083220984414431597997463。。。
p^4*q^2:b(A189988号(n) )=4.1453038440113498808159420150。。。
p^2*q^2*r:b(A179643号(n) )=4.2413382309993874486053755390。。。
p^6*q:b页(189987年(n) )=4.13118051922554587026923218218。。。
电话:b(A046386号(n) )=3.8825338629275134572083061357。。。
...
(结束)
系数的行和开始:0,-1,0,0,0,0,0,1。。。
上述特征值的前三个可以作为嵌套根进行计算。第四个特征值2.205569430400590…减去1=1.2055694304 00590…也是一个嵌套根。
|
|
链接
|
|
|
例子
|
{
{ 1},
{ 1, -1},
{-1, -1, 1},
{-1, 0, 2, -1},
{ 0, 0, 2, -3, 1},
{-1, 2, 1, -5, 4, -1},
{ 1, -3, 5, -8, 9, -5, 1},
{-1, 4, -4, -5, 15, -14, 6, -1},
{ 0, -1, 6, -17, 29, -31, 20, -7, 1},
{ 0, 0, 2, -13, 36, -55, 50, -27, 8, -1},
{ 1, -7, 23, -50, 84, -112, 112, -78, 35, -9, 1}
}
|
|
数学
|
清除[x,AA,nn,s];监视器[AA=扁平[Table[A=Table[If[Mod[n,k]==0,1,0],{k,1,nn}],{n,1,nn}];矩阵形式[A];a=a[[1,nn]];A[[1,nn]]=A[[nn,nn]];A[[nn,nn]]=A;系数表[特征多项式[A,x],x]、{nn,1,10}]],nn]
|
|
交叉参考
|
囊性纤维变性。A051731号,A008683号,A000040型,A001248号,A006881号,A030078型,A030514型,A054753号,A000096号,A001622号,72874英镑,A075795号.
|
|
关键词
|
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
|
|
4620, 5460, 6930, 7140, 7980, 8190, 8580, 9660, 10710, 11220, 11550, 11970, 12012, 12180, 12540, 12870, 13020, 13260, 13650, 14490, 14820, 15180, 15540, 15708, 16170, 16830, 17220, 17556, 17850, 17940, 18018, 18060, 18270, 18564, 18810, 19110, 19140, 19380
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
数学
|
f[n_]:=排序[Last/@FactorInteger[n]]=={1,1,1,2};选择[范围[30000],f]
|
|
程序
|
(PARI)列表(lim)=my(v=list(),t1,t2,t3,t4);对于素数(p=2,平方(lim\210),t1=p^2;对于素数(q=2,lim\(30*t1),如果(q==p,next);t2=q*t1;对于素数(r=2,lim\(6*t2),如果(r==p|r==q,next);t3=r*t2;对于素数(s=2,lim\(2*t3),如果(s==p|s==q|s==r,next);t4=s*t3;对于素数(t=2,lim\t4,如果(t==p|t==q|t==r|t==2,next);列表(v,t4*t)));集合(v)\\查尔斯·格里特豪斯四世2016年8月25日
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
|
|
32, 96, 160, 224, 243, 288, 352, 416, 480, 486, 544, 608, 672, 736, 800, 864, 928, 972, 992, 1056, 1120, 1184, 1215, 1248, 1312, 1376, 1440, 1504, 1568, 1632, 1696, 1701, 1760, 1824, 1888, 1944, 1952, 2016, 2080, 2144, 2208, 2272, 2336, 2400, 2430, 2464, 2528, 2592, 2656, 2673, 2720, 2784, 2848, 2912, 2976
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
该序列的渐近密度为1-乘积_{p素}(1-1/p^5+1/p^6)=0.01863624892-阿米拉姆·埃尔达尔2023年5月5日
|
|
链接
|
|
|
例子
|
包含2^5、2^5*3、2^5*5、2 ^5*7、3 ^5、2*5*3 ^2、2 ^5*11、2 ^ 5*13、2 ^5%*3*5、2*3^5等。
|
|
数学
|
选择[Range[3000],MemberQ[FactorInteger[#][[;;,2]],5]&](*阿米拉姆·埃尔达尔2023年5月5日*)
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
搜索在0.083秒内完成
|