A347356-OEIS公司

A347356型

a（n）=米/A006939号(A001221号（m））带有m=A347284型（n） ●●●●。

1, 1, 2, 2, 2, 4, 24, 24, 48, 48, 96, 576, 576, 1152, 34560, 207360, 414720, 414720, 829440, 174182400, 1045094400, 2090188800, 2090188800, 2090188800, 4180377600, 25082265600, 25082265600, 50164531200, 1504935936000, 3009871872000, 18059231232000 (列表;图表;参考文献;听;历史;文本;内部格式)

	抵消	`1、3`
	链接	`迈克尔·德弗利格，n=1..581时的n，a（n）表` `迈克尔·德弗利格，A347284（n）素数幂分解图对于2<=n<=14，用蓝色表示a（n），A006939号(A089576号（n））和数字A347284型（n）黑色。`
	配方奶粉	`a（n）=A347284型（n）/A006939号(A089576号（n））。`
	例子	`主功率分解图A347284型（12） =2^123^75^47^311^213，表示切尔诺夫数A006939号（6）带有“x”和“x”，A002110号(A347354（12））带“X”，a（12）带“o”：` `12点` `11点` `10个` `9个` `8个` `7点` `6 x o` `5 x x` `4 x x x` `3 x x x x` `2 x x x x` `1 X X X X` `2 3 5 7 ...` `A347284型(12) =A006939号（6） a（12）` `= 5244319080000 * 576` `= 3020727790080000.`
	数学	块[{nn=31，a={}，b，c，e，i，p}，数组[Set[e[#]，0]&，Floor[2^#If[#<=4，1/2，-1+2^（7/（3#））]&[Ciling@Log2@nn]]；做[e[1]++；b={2^e[1]；c＝{e[1]}；Do[If[Last[b]==1，Break[]，i=e[j]；p=质数[j]；当[p^i<b[[j-1]]时，i++]；附加到[b，p^（i-1）]；附录[c，（i-1）]；如果[i>e[j]，e[j]++]]，{j，2，k}]；附加到[a，If[First[#]==0，1，Times@@MapIndexed[Prime[First[#2]]^#1&，TakeWhile[#，#>0&]]&[#-Range[Length[#]，1，-1]]&@If[k>2，Most@c，c]]，{k，nn}]；【a】
	交叉参考	`囊性纤维变性。A001221号,A006939号,A089576号,A347284型.` `上下文中的序列：A259856型 A279805型 2014年12月14日A285441型 A088885号 A232736型` `相邻序列：A347353型 A347354 A347355型A347357型 A347358型 A347359型`
	关键词	`非n`
	作者	`迈克尔·德弗利格2021年10月2日`
	状态	`经核准的`