A331595-OEIS公司

A331595型

a（n）=全球气候变化日(A122111号（n），A241909型（n））。

1, 2, 4, 3, 8, 3, 16, 5, 3, 3, 32, 5, 64, 3, 18, 7, 128, 15, 256, 5, 18, 3, 512, 7, 3, 3, 5, 5, 1024, 15, 2048, 11, 18, 3, 18, 7, 4096, 3, 18, 7, 8192, 15, 16384, 5, 50, 3, 32768, 11, 3, 45, 18, 5, 65536, 7, 108, 7, 18, 3, 131072, 7, 262144, 3, 50, 13, 108, 15, 524288, 5, 18, 45, 1048576, 11, 2097152, 3, 15, 5, 18, 15, 4194304, 11, 7, 3 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,2`
	链接	`安蒂·卡图恩，n=1..16384时的n，a（n）表` `根据素因子分解中的索引计算序列的索引项`
	公式	`a（n）=全球气候变化日(A122111号（n），A241909型（n））。` `一个(A241916型（n））=a（n）。`
	数学	数组[If[#==1，1，GCD@@{Block[{k=#，m=0}，Times@@Power@@@表[k-=m；k=DeleteCase[k，0]；{素数@Length@k，m=Min@k}，长度@Union@k]]&@Catenate[ConstantArray[PrimePi[#1]，#2]&@@@#]，函数[t，时间@@Prime@Accumulate[If[Length@t<2，{0}，Join[{1}，ConstantArray[0，Length@@t-2]，{-1}]+ReplacePart[t，Map[#1->#2&@@#&，#]]]]@ConstantArray[0，Transpose[#][[1，-1]]]&#/.{p_，e_}/；p>0:>{PrimePi@p，e}]}&@FactorInteger[#]]&，82](迈克尔·德弗利格2020年1月24日之后JungHwan Min（JungHwan Min）在A122111号)
	黄体脂酮素	`（PARI）` `A064989号（n） ={my（f）；f=因子（n）；如果（n>1&&f[1,1]==2），f[1,2]=0）；对于（i=1，#f~，f[i，1]=precprime（f[i、1]-1））；因子回退（f）}；` `A122111号（n） =如果（1==n，n，素数（bigomega（n））A122111号(A064989号（n））；` `A241909型（n） =如果（1==n\|\|isp素数（n），2^素数（n），my（f=因子（n）），h=1，i，m=1，p=1，k=1）；while（k<=#f~，p=下一素数（1+p）；i=素数（f[k，1]）；m=p^（i-h）；h=i；如果（f[k，2]>1，f[k；2]--，k++）；（p*m））；` `A331595型（n） =gcd(A122111号（n），A241909型（n））；`
	交叉参考	`参见。A122111号,A241909型,A241916型,A331596型（不同素因子的数量），A331597型,A331598型,A331599型,A331600型.` `另请参阅A280489型,A280491型.` `上下文中的序列：A058330型 A124256号 2008年10月03日A347288型 A324213型 A052131号` `相邻序列：A331592型 A331593型 A331594型A331596型 A331597型 A331598型`
	关键字	`非n`
	作者	`安蒂·卡图恩2020年1月22日`
	状态	`经核准的`