A292258-OEIS公司

A292258型

a（1）=1；对于n>1，a（n）=素数(1996年12月1日（n） -1）*a（楼层（n/2））。

1, 2, 2, 6, 4, 10, 4, 42, 18, 20, 8, 110, 20, 20, 20, 546, 84, 198, 36, 220, 100, 40, 16, 1870, 330, 100, 140, 220, 40, 380, 40, 12558, 2730, 420, 420, 5742, 396, 180, 180, 3740, 440, 1900, 200, 440, 440, 80, 32, 57970, 5610, 3630, 1650, 1100, 200, 2380, 700, 3740, 1100, 200, 80, 14060, 760, 200, 440, 514878 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,2`
	链接	`安蒂·卡图恩，n=1..8191时的n，a（n）表`
	配方奶粉	`a（1）=1；对于n>1，a（n）=A000040型(1996年12月1日（n） -1）*a(A004526号（n））。` `其他身份。对于所有n>=1：` `A001222号（a（n））=A000523号（n） ●●●●。` `A007814号（a（n））=A078349号（n） ●●●●。`
	数学	`使用[{nn=64}，Block[{s=Function[s，Table[Position[Keys@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]，{，nn}]，a}，a[n_]：=a[n]=如果[n==1，1，素数[s[n]]-1]a[楼层[2]]]；数组[a，nn]]](迈克尔·德弗利格2017年9月22日*）`
	黄体脂酮素	`（PARI）` `up_to=8191` `rgs_transform（invec）={my（om=Map（），outvec=vector（length（invec）），u=1）；对于（i=1，长度（invesc），如果（mapisdefined（om，invec[i]），my（pp=mapget（om，invec[i]；` `A046523号（n） ={my（f=vecsort（factor（n）[，2]，4），p）；prod（i=1，#f，（p=nextprime（p+1））^f[i]）；}；\\此函数来自查尔斯·格里特豪斯四世2011年8月17日` `v101296=rgs_transform（向量（up_to，n，A046523号（n）））；` `1996年12月1日（n） =v101296[n]；` `A292258型（n） =如果（1==n，n，素数(1996年12月1日（n） -1）*A292258型（n\2））；`
	交叉参考	`囊性纤维变性。A000040型,A000523号,A004526号,A007814号,A078349号,1996年12月1日,A292259号（此过滤器的rgs版本）。` `上下文中的序列：A061108型 284918英镑 A053213号A140524号 2004年2月 A109043号` `相邻序列：A292255型 A292256型 A292257型A292259号 A292260型 A292261型`
	关键词	`非n`
	作者	`安蒂·卡图恩2017年9月22日`
	状态	`经核准的`