登录
A064478号
如果n=乘积p(k)^e(k),则a(n)=乘积(p(k。
8
1, 2, 3, 4, 9, 6, 12, 8, 27, 16, 18, 12, 36, 14, 24, 24, 81, 18, 48, 20, 54, 32, 36, 24, 108, 36, 42, 64, 72, 30, 72, 32, 243, 48, 54, 48, 144, 38, 60, 56, 162, 42, 96, 44, 108, 96, 72, 48, 324, 64, 108, 72, 126, 54, 192, 72, 216, 80, 90, 60, 216, 62, 96, 128, 729, 84, 144
抵消
0,2
评论
根据约定,a(0)=1和a(1)=2(这使得a(n)不可乘法)。
替代约定a(0)=0和a(1)=1会使a(n)完全乘法(参见。A003959号用于完全乘法版本。)-丹尼尔·福格斯2009年11月17日
链接
哈里·史密斯,n=0..1000时的n,a(n)表
MAPLE公司
a: =n->`如果`(n<2,n+1,mul((i[1]+1)^i[2],i=ifactors(n)[2])):
seq(a(n),n=0..80)#阿洛伊斯·海因茨,2017年9月13日
数学
a[0]=1;a[1]=2;a[n_]:=(fi=FactorInteger[n];时间@@((fi[[All,1]]+1)^fi[[Al,2]]));表[a[n],{n,0,66}](*Jean-François Alcover公司2011年11月14日*)
f[n_]:=次数@@((1+#[1]])^#[2]]&/@FactorInteger@n);数组[f,67,0](*罗伯特·威尔逊v2017年9月13日*)
黄体脂酮素
(PARI)
ns(n)=局部(f,p=1);f=系数(n);对于(i=1,矩阵大小(f)[1],p*=(1+f[i,1])^f[i、2]);返回(p)
对于(n=0,1000,如果(n>1,a=ns(n),a=n+1);写入(“b064478.txt”,n,“”,a)\\哈里·史密斯2009年9月15日
(哈斯克尔)
a064478 n=如果n<=1,则n+1,否则a003959 n
--莱因哈德·祖姆凯勒2013年2月28日
交叉参考
关键词
非n,美好的,容易的
作者
N.J.A.斯隆2001年10月6日
扩展
更多术语来自弗拉德塔·乔沃维奇2001年10月6日
编辑人丹尼尔·福格斯2009年11月18日
状态
经核准的