A078652-OEIS公司

A078652号

a（1）=1，a（2n）=下一个素数（a（n-1）），a（2 n+1）=前面所有项的位数之和+1。

1, 2, 4, 5, 13, 17, 25, 29, 43, 47, 61, 67, 81, 83, 101, 103, 107, 109, 125, 127, 143, 149, 165, 167, 191, 193, 215, 223, 230, 233, 243, 251, 260, 263, 279, 281, 308, 311, 324, 331, 340, 347, 361, 367, 387, 389, 425, 431, 444, 449, 473, 479, 507, 509, 533, 541 (列表；图表；参考；听；历史；文本；内部格式)

	抵消	`1,2`
	链接	`n=1..56时的n、a（n）表。`
	数学	`lst={1}；i=1；Do[If[EvenQ[n]，AppendTo[lst，NextPrime[lst[lst]]，AppendTo[lst，Total[Flatten[InterDigits/@lst]]]；i++，{n，60}]；休息[lst](哈维·P·戴尔2011年9月3日）`
	黄体脂酮素	（PARI）数字（n）=局部（s，d）；s=0；而（n>0，d=divrem（n，10）；n=d[1]；s=s+d[2]）；s{sdnp（m）=局部（a=1，ct=0，lp=0，ls=0，sqc=0，sr=0，t=1）；if（isprime（b），ct++；lp=b；）；if-（issquare（b）），sqc++；ls=b；；）；sr+=（1.0/b）；））；print（）；打印（结果）；打印ct“素数<=”m）；打印（“找到”sqc“方块<=”m）；print（“奇数部分中的最后一个素数：”lp）；print（“找到的最后一个方块：”ls）；print（“素数与“m”之比为“ct/m+0.0”）；print（“倒数之和=”sr）；}
	交叉参考	`上下文中的序列：A128457号 A139485型 A079407号A289491型 A102992号 A273097型` `相邻序列：A078649号 A078650型 A078651号A078653号 A078654美元 A078655型`
	关键词	`基础,容易的,非n`
	作者	`杰森·厄尔斯2002年12月14日`
	状态	`经核准的`