|
|
|
|
1, 1, 2, 10, 141, 6769, 1298995, 1148840085, 5307091649182, 143026276277298216, 24801104674619158730662, 30190572492693121799801655311, 278937095127086600900558327826721594
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,3
|
|
评论
|
第n个超本原是A006939号(n) =Product_{i=1..n}素数(i)^(n-i+1),它有n!除数。
还有超本原素因子多集的集多部分(集的多集)的个数A006939号(n) ●●●●。
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
a(1)=1到a(3)=10分解:
2 2*6 2*6*30
2*2*3 6*6*10
2*5*6*6
2*2*3*30
2*2*6*15
2*3*6*10
2*2*3*5*6
2*2*2*3*15
2*2*3*3*10
2*2*2*3*3*5
a(1)=1到a(3)=10集合多部分:
{1} {1}{12} {1}{12}{123}
{1}{1}{2} {12}{12}{13}
{1}{1}{12}{23}
{1}{1}{2}{123}
{1} {2}{12}{13}
{1}{3}{12}{12}
{1}{1}{1}{2}{23}
{1}{1}{2}{2}{13}
{1}{1}{2}{3}{12}
{1}{1}{1}{2}{2}{3}
|
|
数学
|
chern[n_]:=乘积[素数[i]^(n-i+1),{i,n}];
facsqf[n_]:=如果[n<=1,{{}},连接@@表[Map[Prepend[#,d]&,选择[facsqf[n/d],Min@@#>=d&]],{d,选择[Rest[Divisors[n]],SquareFreeQ]}]];
表[Length[facsqf[chern[n]]],{n,0,3}]
|
|
黄体脂酮素
|
a(n)={if(n==0,1,计数(向量(n,i,i))}\\安德鲁·霍罗伊德2020年8月31日
|
|
交叉参考
|
|
|
关键词
|
非n,更多
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|