搜索: a340653-识别码:a340653
|
|
A106529号
|
| 具有k个素数因子(以多重数计算)的数,其中最大的是第k个素元。 |
|
+10 109
|
|
|
2, 6, 9, 20, 30, 45, 50, 56, 75, 84, 125, 126, 140, 176, 189, 196, 210, 264, 294, 315, 350, 396, 416, 440, 441, 490, 525, 594, 616, 624, 660, 686, 735, 875, 891, 924, 936, 968, 990, 1029, 1040, 1088, 1100, 1225, 1386, 1404, 1452, 1456, 1485, 1540, 1560
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
似乎随着n的增加,连续项之间的比率趋于1,这意味着大多数数字可能都在这个序列中。
以第k个素数作为其最大素数因子的项数为A000984号(k) 第k个中心二项系数。例如,6和9是A000984号(2) {a(n)}中的2个项,其中素数(2)=3是它们的最大素数因子。
序列包含正整数m,使得分区B(m)的秩=0。对于m>=2,B(m)定义为通过取m的素数分解并用其指数i替换每个素数因子p(即第i素数=p)而获得的分区;B(1)=空分区。例如,B(350)=B(2*5^2*7)=[1,3,3,4]。B是正整数和所有分区集之间的双射。分区P的秩是P的最大部分减去P的部分数-Emeric Deutsch公司2015年5月9日
平衡分区的Heinz数,按A047993号.整数分区(y_1,…,y_k)的Heinz数是质数(y_1)**质数(yk)-古斯·怀斯曼2021年2月8日
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
a(7)=50,因为对于k=3,50=2*5*5是k个素数的乘积,其中最大的是第k个素数,50是这样的第7个数。
|
|
MAPLE公司
|
with(numtheory):a:=proc(n)options操作符,arrow:pi(max(factorset(n)))-bigomega(n)end proc:a:={}:for i from 2 to 1600 do if a(i)=0 then a:=`union`(a,{i})else end if end do:a#Emeric Deutsch公司2015年5月9日
|
|
数学
|
选择[Range@1560,PrimePi@FactorInteger[#][[-1,1]]==PrimeOmega@#&](*迈克尔·德·维利格2015年5月9日*)
|
|
交叉参考
|
其他平衡相关序列:
|
|
关键词
|
非n
|
|
作者
|
Matthew Ryan(mattryan1994(AT)hotmail.com),2005年5月30日
|
|
状态
|
经核准的
|
|
|
|
|
A006141号
|
| n的整数分区数,其最小部分等于部分数。 (原名M0260)
|
|
+10个 63
|
|
|
1, 0, 0, 1, 1, 1, 1, 1, 2, 2, 3, 3, 4, 4, 5, 6, 7, 8, 10, 11, 13, 15, 17, 19, 23, 25, 29, 33, 38, 42, 49, 54, 62, 69, 78, 87, 99, 109, 123, 137, 154, 170, 191, 211, 236, 261, 290, 320, 357, 392, 435, 479, 530, 582, 644, 706, 779, 854, 940, 1029, 1133, 1237, 1358, 1485
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,9
|
|
评论
|
或者,n的分区数,其中最大部分的数量等于最大部分的数量。
a(n)是n-1的分区数,其中没有相差小于2的部分,并且没有小于3的部分。[麦克马洪]
在这个序列中,偏移量有两个相互冲突的选择。对于这里给出的定义,偏移量是1,这就是我们要采用的。另一方面,如果通过Rogers-Ramanujan恒等式(请参阅下一条注释)到达该序列,则自然偏移量为0。
与Rogers-Ramanujan恒等式相关:设G[1](q)和G[2](q)是A003114号和A003106号,从常数项1开始。当前序列的g.f.为g[3](q)=(g[1](q)-g[2](q))/q=1+q^3+q^4+q^5+q^6+q^7+2*q^8+2*qq^9+3*q^10+-乔格·阿恩特2012年10月8日;N.J.A.斯隆2015年11月18日
有关广义Rogers-Ramanujan级数G[i](x)的更多信息,请参阅Andrews-Baxter和Lepowsky-Zhu的论文。本系列为G[3](x)-N.J.A.斯隆2015年11月22日
根据Hardy(H)第94页,等式(6.12.1)和Hardy-Wright(H-W),第293页,H_2(a,x)-H_1(a,x)=a*H_1(a*x,x)的等式(19.14.3),在将a=x,a(n)的o.g.f=A003114号(n)-A003106号(n) ,n>=0,a(0)=0表示和{m>=0}x^((m+1)^2)/Product_{j=1..m}(1-x^j)。m=0项是1*x^1。参见公式乔格·阿恩特2011年1月29日。
该公式有一个组合解释(与(H)第6.0节第91-92页或(H-W)第290-291页中给出的公式类似):a(n)是n的分区数,其中部分差异至少为2,部分差异为1。参见下面的示例a(15)。(结束)
|
|
参考文献
|
G.H.Hardy,Ramanujan,AMS切尔西出版社。,普罗维登斯,国际扶轮社,2002年,第92-95页。
G.H.Hardy和E.M.Wright,《数字理论导论》,第五版,克拉伦登出版社,牛津,2003年,第292-294页。
P.A.MacMahon,《组合分析》,剑桥大学出版社,伦敦和纽约,1915年第1卷和1916年第2卷;见第2卷,第45页,第293节。
N.J.A.Sloane和Simon Plouffe,《整数序列百科全书》,学术出版社,1995年(包括该序列)。
|
|
链接
|
詹姆斯·列波夫斯基和朱敏贤,戈登身份的有力证明,arXiv:1205.6570[math.CO],2012;《拉马努扬杂志》29.1-3(2012):199-211。
西蒙·普劳夫,盖恩斯-奎尔克猜想的逼近《魁北克大学论文》,1992年;arXiv:0911.4975[math.NT],2009年。
|
|
配方奶粉
|
通用公式:和{m>=1}(x^(m^2)-x^,m*(m+1))/产品{i=1..m}(1-x^i)。
通用公式:和{n>=1}x^(n^2)/产品{k=1..n-1}(1-x^k)-乔格·阿恩特2011年1月29日
普劳夫在1992年的论文中推测这是g.f.=(1+z+z^4+2*z^5-z^3-z^8+3*z^10-z^7+z^9)/(1+z z^4-2*z^3-z ^8+z^10),但是迈克尔·索莫斯2008年1月22日指出,这是错误的。
(f(-x^2,-x^3)-f(-x,-x*4))/f(-x)的x次幂展开式,其中f(,)是Ramanujan的一般θ函数-迈克尔·索莫斯2007年1月22日
a(n)~平方(1/sqrt(5)-2/5)*exp(2*Pi*sqrt)(n/15))/(2*3^(1/4)*n^(3/4))-瓦茨拉夫·科特索维奇2016年11月1日
|
|
例子
|
G.f.=x+x ^4+x ^5+x ^6+x ^7+x ^8+2*x ^9+2*x^10+3*x ^11+3*x^12+。。。
a(15)=5,因为最小部分等于部分数的15的分区为
3+6+6,
3 + 5 + 7,
3 + 4 + 8,
3+3+9,以及
2 + 13.
a(15)=5,因为存在部分差异至少为2和部分1的15的分区是:[14,1]从具有一个部分的11的分区[11]中获得,添加到4的特殊分区[3,1]和[11,3,1]的第一部分,[10,4,1],[9,5,1],[08,6,1],将所有15-9=6的分区与一个部分[6]和具有两个部分的分区相加,[5,1]、[4,1]、[3]到9的特殊分区[5,3,1]-沃尔夫迪特·朗2016年10月31日
a(15)=5,因为部分>=3的14的分区和差异至少为2的部分是[14]、[11,3]、[10,4]、[9,5]和[8,6]。请参阅[MacMahon]的第二条评论。这是根据安德鲁斯-巴克斯特(Andrews-Baxter)中给出的g.f.g[3](q)得出的公式(5.1),其中i=3(使用总和指数m)和m*(m+2)=3+5+…+(2*m+1)-沃尔夫迪特·朗2016年11月2日
a(8)=1到a(15)=5整数分区:
(6,2) (7,2) (8,2) (9,2) (10,2) (11,2) (12,2) (13,2)
(3,3,3) (4,3,3) (4,4,3) (5,4,3) (5,5,3) (6,5,3) (6,6,3)
(5,3,3) (6,3,3) (6,4,3) (7,4,3) (7,5,3)
(7,3,3) (8,3,3) (8,4,3)
(9,3,3)
(结束)
|
|
MAPLE公司
|
b: =proc(n,i)选项记忆`如果`(n<0,0,`如果`(n=0,1,
`如果`(i<1,0,b(n,i-1)+`如果`(i>n,0,b(n-i,i)))
结束时间:
a: =n->加(b(n-j^2,j-1),j=0.isqrt(n)):
|
|
数学
|
b[n,i_]:=b[n,i]=如果[n<0,0,如果[n=0,1,如果[i<1,0,b[n,i-1]+如果[i>n,0,b[n-i,i]]]];a[n_]:=总和[b[n-j^2,j-1],{j,0,Sqrt[n]}];表[a[n],{n,1,80}](*Jean-François Alcover公司,2014年3月17日,之后阿洛伊斯·海因茨*)
表[Length[Select[Integer Partitions[n],Min[#]==Length[#]&]],{n,30}](*古斯·怀斯曼2019年3月9日*)
|
|
黄体脂酮素
|
(PARI){a(n)=如果(n<1,0,polcoeff(和(k=1,平方(n),x^k^2/prod(j=1,k-1,1-x^j,1+O(x^(n-k^2+1))),n))}/*迈克尔·索莫斯2008年1月22日*/
|
|
交叉参考
|
与平衡相关的序列:
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
更多来自Kok Seng Chua(chuaks(AT)ihpc.nus.edu.sg)的条款,2000年6月20日
|
|
状态
|
经核准的
|
|
|
|
|
A368413型
|
| n分解为大于1的正整数的次数,因此不可能为每个因子选择不同的素因子。 |
|
+10个 41
|
|
|
0, 0, 0, 1, 0, 0, 0, 2, 1, 0, 0, 1, 0, 0, 0, 4, 0, 1, 0, 1, 0, 0, 0, 3, 1, 0, 2, 1, 0, 0, 0, 6, 0, 0, 0, 4, 0, 0, 0, 3, 0, 0, 0, 1, 1, 0, 0, 7, 1, 1, 0, 1, 0, 3, 0, 3, 0, 0, 0, 2, 0, 0, 1, 10, 0, 0, 0, 1, 0, 0, 0, 10, 0, 0, 1, 1, 0, 0, 0, 7, 4, 0, 0, 2, 0, 0
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,8
|
|
评论
|
例如,因子分解f=2*3*6有两种方法来选择每个因子的素因子,即(2,3,2)和(2,3,1),但这两种方法都没有所有不同的元素,因此f在a(36)下计算。
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
a(1)=0到a(24)=3分解:
... 2*2 ... 2*4 3*3 .. 2*2*3 ... 2*8 . 2*3*3 . 2*2*5 ... 2*2*6
2*2*2 4*4 2*3*4
2*2*4 2*2*2*3
2*2*2*2
|
|
数学
|
facs[n_]:=如果[n<=1,{{}},连接@@表[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}];
表[Length[Select[facs[n],Select[Tuples[First/@FactorInteger[#]&/@#],UnsameQ@@#&]={}&]],{n,100}]
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
A368414飞机
|
| 将n分解为大于1的正整数的次数,以便可以为每个因子选择不同的素因子。 |
|
+10 37
|
|
|
1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 3, 1, 2, 2, 1, 1, 3, 1, 3, 2, 2, 1, 4, 1, 2, 1, 3, 1, 5, 1, 1, 2, 2, 2, 5, 1, 2, 2, 4, 1, 5, 1, 3, 3, 2, 1, 5, 1, 3, 2, 3, 1, 4, 2, 4, 2, 2, 1, 9, 1, 2, 3, 1, 2, 5, 1, 3, 2, 5, 1, 6, 1, 2, 3, 3, 2, 5, 1, 5, 1, 2, 1, 9, 2, 2, 2
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,6
|
|
评论
|
例如,因子分解f=2*3*6有两种方法来选择每个因子的素因子,即(2,3,2)和(2,3,1),但这两种方法都没有所有不同的元素,因此f不计入a(36)中。
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
选定n的a(n)因子分解:
1 6 12 24 30 60 72 120
2*3 2*6 2*12 2*15 2*30 2*36 2*60
3*4 3*8 3*10 3*20 3*24 3*40
4*6 5*6 4*15 4*18 4*30
2*3*5 5*12 6*12 5*24
6*10 8*9 6*20
2*3*10 8*15
2*5*6 10*12
3*4*5 2*3*20
2*5*12
2*6*10
3*4*10
3*5*8
4*5*6
|
|
数学
|
facs[n_]:=如果[n<=1,{{}},连接@@表[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}];
表格[Length[Select[facs[n],Select[Tuples[First/@FactorInteger[#]和/@#],UnnameQ@@#&]={}&]],{n,100}]
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
A168659号
|
| n的分区数,使得部分数可以被最大部分整除。也是n的分区数,使得最大部分可以被部分数整除。 |
|
+10 34
|
|
|
1, 1, 2, 2, 3, 3, 6, 6, 8, 9, 14, 16, 22, 25, 33, 39, 51, 60, 79, 92, 116, 137, 174, 204, 254, 300, 368, 435, 530, 625, 760, 896, 1076, 1267, 1518, 1780, 2121, 2484, 2946, 3444, 4070, 4749, 5594, 6514, 7637, 8879, 10384, 12043, 14040, 16255
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
链接
|
|
|
配方奶粉
|
通用公式:求和{i>=1}求和{j>=1}x^((i+1)*j-1)*Product_{k=1..j-1}(1-x ^(i*j+k-1)/(1-x^k)-Seiichi Manyama先生2022年1月24日
|
|
例子
|
a(5)=3,因为在分区[1,1,1,1]、[1,1,1,2]、[1,1,3]中,部分的数量可以被最大部分整除;分区[1,2,2]、[2,3]、[1,4]和[5]不适用-Emeric Deutsch公司2009年12月4日
第一种类型的a(1)=1到a(10)=9个分区:
1 11 21 22 311 321 322 332 333 4222
111 1111 2111 2211 331 2222 4221 4321
11111 111111 2221 4211 4311 4411
4111 221111 51111 52111
211111 311111 222111 222211
1111111 11111111 321111 322111
21111111 331111
111111111 22111111
1111111111
第二类(a=10,B=11)的a(1)=14到a(11)=14分区:
1 2 3 4 5 6 7 8 9 A B
21 22 41 42 43 44 63 64 65
311 321 61 62 81 82 83
322 332 333 622 A1电话
331 611 621 631 632
4111 4211 4221 4222 641
4311 4321 911
51111 4411 4322
52111 4331
4421
8111
52211
53111
611111
(结束)
|
|
MAPLE公司
|
a:=proc(n)local pn,ct,j:with(combint):pn:=partition(n):ct:=0:对于j到numbpart(n)do if `mod`(nops(pn[j]),max(seq(pn[j][i],i=1.nops(pn[j))))=0,则ct:=ct+1 else end if end do:ct end proc:seq(a(n),n=1。。50); #Emeric Deutsch公司2009年12月4日
|
|
数学
|
表[Length[Select[Integer Partitions[n],Divisible[Length[#],Max[#]&]],{n,30}](*古斯·怀斯曼2021年2月8日*)
|
|
交叉参考
|
注:亨氏数序列的A数在下面的括号中。
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
0, 1, 1, 2, 3, 5, 6, 10, 13, 19, 25, 35, 45, 62, 80, 106, 136, 178, 225, 291, 366, 466, 583, 735, 912, 1140, 1407, 1743, 2140, 2634, 3214, 3932, 4776, 5807, 7022, 8495, 10225, 12313, 14762, 17696, 21136, 25236, 30030, 35722, 42367, 50216, 59368, 70138, 82665
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4
|
|
评论
|
分区的秩是最大和减去和数。
还有n个具有负秩的分区的数量-奥马尔·波尔2012年3月5日
n的分区数p,使得max(max(p),p的部分数)不是p的一部分-克拉克·金伯利2014年2月28日
序列枚举每个数n的正秩分区半群。该半群是二元运算“*”下非负秩分区幺半群的子半群:设a是正秩分划(a1,…,ak),其中ak>k,设B=(b1,…bj),其中bj>j。然后让A*B是分区(a1b1,…,a1bj,…,akb1,..,akbj),它的akbj>kj,因此具有正秩。例如,9的分区(2,3,4)的秩为1,其与自身的乘积为81的(4,6,6,8,8,9,12,12,16),其秩为7。负秩划分也有类似的情况——它们是非正秩划分的幺半群的子半群-理查德·洛克·彼得森,2018年7月15日
|
|
链接
|
|
|
配方奶粉
|
a(n)=p(n-2)-p(n-7)+p(n-15)-…-(-1)^k*p(n-(3*k^2+k)/2)+。。。,其中p()是A000041号(). -弗拉德塔·乔沃维奇2004年8月4日
G.f.:乘积{k>=1}(1/(1-q^k))*和{k>=1}((-1)^k*(-q^(3*k^2/2+k/2))(推测)-托马斯·巴鲁切尔2018年5月12日
|
|
例子
|
a(20)=p(18)-p(13)+p(5)=385-101+7=291。
a(2)=1到a(9)=13个正秩分区:
(2) (3) (4) (5) (6) (7) (8) (9)
(31) (32) (33) (43) (44) (54)
(41) (42) (52) (53) (63)
(51) (61) (62) (72)
(411) (421) (71) (81)
(511) (422) (432)
(431)(441)
(521) (522)
(611) (531)
(5111)(621)
(711)
(5211)
(6111)
(结束)
|
|
MAPLE公司
|
with(combint):对于从1到30的n,P:=分区(n):c:=0:对于从一到nops(P)的j,do如果P[j][nops(P[j])]>nops(P[j]#Emeric Deutsch公司2004年12月11日
|
|
数学
|
表[Count[Integer Partitions[n],q_/;第一个[q]>长度[q]],{n,24}](*克拉克·金伯利2014年2月12日*)
表[Count[IntegerPartitions[n],p_/!成员Q[p,最大[Max[p],长度[p]]],{n,20}](*克拉克·金伯利2014年2月28日*)
P=分区P;
a[n_]:=(P[n]-总和[-(-1)^k(P[n-(3k^2-k)/2]-P[n-[3k^2+k)/2]),{k,1,楼层[(1+Sqrt[1+24n])/6]}])/2;
|
|
黄体脂酮素
|
(PARI)我的(N=66,x='x+O('x^N));concat(0,Vec(总和(k=1,N,x^k*prod(j=1,k,(1-x^(k+j-2))))\\Seiichi Manyama先生2022年1月25日
|
|
交叉参考
|
注:下面括号中是排名序列的A数字。
-排名-
-余额-
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
A370813
|
| 将n分解为无序因子的非凝聚整数分解次数>1。 |
|
+10 31
|
|
|
0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 2, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 2, 1, 0, 0, 0, 0, 0, 0
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,32
|
|
评论
|
如果可以为每个元素选择不同的除数,则多集是压缩的。
|
|
链接
|
|
|
例子
|
a(96)=4分解:(2*2*2x2*2*3),(2*2*2*2*6),(2*2*2*3*4),(2,2*2*12)。
|
|
数学
|
facs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisions[n]]}]];
表[Length[Select[facs[n],Length[Celect[Tuples[Divisors/@#],UnsameQ@@#&]]==0&]],{n,100}]
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1, 3, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 4, 1, 1, 1, 3, 1, 1, 1, 2, 2, 1, 1, 4, 1, 2, 1, 2, 1, 3, 1, 3, 1, 1, 1, 4, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 5, 1, 1, 2, 2, 1, 1, 1, 4, 1, 1, 1, 4, 1, 1, 1
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,12
|
|
评论
|
我们定义了将n分解为因子>1的因子,如果它确实具有A001221号(n) 因素。
|
|
链接
|
|
|
例子
|
n=12,24,36,72,120,144,180的a(n)联合平衡因子分解:
2*6 3*8 4*9 8*9 3*5*8 2*72 4*5*9
3*4 4*6 6*6 2*36 4*5*6 3*48 5*6*6
2*12 2*18 3*24 2*2*30 4*36 2*2*45
3*12 4*18 2*3*20 6*24 2*3*30
6*12 2*4*15 8*18 2*5*18
2*5*12 9*16 2*6*15
2*6*10 12*12 2*9*10
3*4*10 3*3*20
3*4*15
3*5*12
3*6*10
|
|
数学
|
facs[n_]:=如果[n<=1,{{}},连接@@表[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}];
表[长度[Select[facs[n],长度[#]==PrimeNu[n]&]],{n,100}]
|
|
交叉参考
|
其他平衡相关序列:
囊性纤维变性。A003963号,A006141号,A050320型,A112798号,A117409号,A324518型,A339846飞机,A339890型,A340607飞机,A340656型,A340657.
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
2, 3, 5, 6, 7, 9, 11, 13, 14, 17, 19, 20, 21, 23, 26, 29, 30, 31, 35, 37, 38, 39, 41, 43, 45, 47, 49, 50, 52, 53, 56, 57, 58, 59, 61, 65, 67, 71, 73, 74, 75, 78, 79, 83, 84, 86, 87, 89, 91, 92, 95, 97, 101, 103, 106, 107, 109, 111, 113, 117, 122, 125, 126, 127
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
n的素数指数是一个数m,使得素数(m)除以n。n的多素数指数集是A112798号.
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
术语序列及其基本指数开始于:
2: {1} 29: {10} 56: {1,1,1,4}
3: {2} 30: {1,2,3} 57: {2,8}
5: {3} 31: {11} 58: {1,10}
6: {1,2} 35: {3,4} 59: {17}
7: {4} 37: {12} 61: {18}
9: {2,2} 38: {1,8} 65: {3,6}
11: {5} 39: {2,6} 67: {19}
13: {6} 41: {13} 71: {20}
14: {1,4} 43: {14} 73: {21}
17: {7} 45: {2,2,3} 74: {1,12}
19: {8} 47: {15} 75: {2,3,3}
20: {1,1,3} 49: {4,4} 78: {1,2,6}
21: {2,4} 50: {1,3,3} 79: {22}
23:{9}52:{1,1,6}83:{23}
26: {1,6} 53: {16} 84: {1,1,2,4}
|
|
MAPLE公司
|
过滤器:=proc(n)局部F,m,g,t;
F: =i因子(n)[2];
m: =加(t[2],t=F);
g: =数量理论:-pi(最大值(seq(t[1],t=F));
g mod m=0;
结束进程:
|
|
数学
|
选择[Range[2,100],Divisible[PrimePi[FactorInteger[#][[-1,1]]],PrimeOmega[#]]&]
|
|
交叉参考
|
注:Heinz数字在下面的括号中给出。
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1,1,1,2,1,2,2,2,2,1,4,1,2,2,2,4,1,4,2,2,1,6,2,2,4,1,5,1,5,2,2,2,8,1,2,6,1,5,1,4,4,2,10,2,4,2,4,1,6,2,2,1,11,1,2,4,7,2,5,1,4,2,5,1,14,1,2,4,4,2,5,1,10,4,2,1,11,2
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4
|
|
评论
|
如果可以为每个元素选择不同的除数,则多集是压缩的。
|
|
链接
|
|
|
例子
|
a(36)=7分解:(2*2*9),(2*3*6),(2*18),(3*3*4),(3*12),(4*9)、(6*6)、(36)。
|
|
数学
|
facs[n_]:=如果[n<=1,{{}},连接@@表[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}];
表[Length[Select[facs[n],Length[Celect[Tuples[Divisors/@#],UnsameQ@@#&]]>0&]],{n,100}]
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.033秒内完成
|