A000015-OEIS公司

A000015号

最小主功率>=n。

1, 2, 3, 4, 5, 7, 7, 8, 9, 11, 11, 13, 13, 16, 16, 16, 17, 19, 19, 23, 23, 23, 23, 25, 25, 27, 27, 29, 29, 31, 31, 32, 37, 37, 37, 37, 37, 41, 41, 41, 41, 43, 43, 47, 47, 47, 47, 49, 49, 53, 53, 53, 53, 59, 59, 59, 59, 59, 59, 61, 61, 64, 64, 64, 67, 67, 67, 71, 71, 71, 71, 73 (列表；图表；参考；听；历史；文本；内部格式)

	抵消	`1,2`
	评论	`{a（n）}第m次运行的长度是A031218号对于m>1-科林·林泽2024年3月8日`
	链接	`David W.Wilson，n=1..10000时的n，a（n）表` `埃里克·魏斯坦的数学世界，主要电力公司.`
	配方奶粉	`一个(A110654号（n+1））=A188666号（n） -莱因哈德·祖姆凯勒，2011年4月25日，更正人M.F.哈斯勒2015年7月25日` `a（n）=A188666号（2n-1）-M.F.哈斯勒2015年7月25日`
	MAPLE公司	`N： =1000:#获得所有项<=N` `素数：=选择（isprime，{$1..N}）：` `PP:={1}联合素数：` `对于k从1到ilog2（N）do` PP:=PPs联合映射（`^`，select（`<=`，Primes，floor（N^（1/k））），k） `日期：` `PP:=排序（转换（PP，列表））：` `1，seq（PPs[i]$（PPs[1]-PPs[i-1]），i=2..nops（PPs））#罗伯特·伊斯雷尔2015年7月23日`
	数学	`插入[Table[m:=n；While[Not[Length[FactorInteger[m]]==1]，m++]；m、 {n，2100}]，1，1](斯特凡·斯坦纳伯格，2006年4月17日）` `a[n_]：=NestWhile[#+1&，n，非@PrimePowerQ]；(马修·豪斯，2015年7月14日，v6.0+）` `a[n_]：=如果[n<2，Boole[n==1]，模[{m=n}，While[！PrimePowerQ[m]，m++]；m] ]；(迈克尔·索莫斯2018年3月6日）` `a[n_]：=如果[n<1，0，模块[{m=n}，而[Length[FactorInteger@m]！=1，m++]；m] ]；(迈克尔·索莫斯，2018年3月6日*）`
	黄体脂酮素	`（PARI）{a（n）=如果（n<1，0，while（matsize（factor（n））[1]>1，n++）；n）}/迈克尔·索莫斯2002年7月16日/` `（PARI）a（n）=如果（n>1，而（！isprimepower（n），n++））；n个\\查尔斯·格里特豪斯四世2013年2月1日` `（弧垂）[范围（72）内n的next_prime_power（n）]#零入侵拉霍斯，2009年6月13日` `（哈斯克尔）` `a000015 n=a000015_列表！！（n-1）` `a000015_list=1:concat` `（zipWith（\pp qq->replicate（fromInteger（pp-qq））pp）` `（尾部a000961_list）a000961_list）` `--莱因哈德·祖姆凯勒2011年11月17日，2011年4月25日`
	交叉参考	`囊性纤维变性。A000961号,A031218号.` `上下文中的序列：A343271型 A363897型 A114707号A306369型 1990年2月 A291934型` `相邻序列：A000012号 A000013号 A000014号A000016号 A000017号 A000018号`
	关键词	`非n,容易的`
	作者	`N.J.A.斯隆`
	扩展	`来自的更多条款迈克尔·索莫斯2002年7月16日`
	状态	`经核准的`

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间：美国东部夏令时2024年4月19日19:02。包含371798个序列。（在oeis4上运行。）