46547欧元

A246547号

素数幂p^e，其中p是素数，e>=2（没有素数或1的素数幂）。

101

4, 8, 9, 16, 25, 27, 32, 49, 64, 81, 121, 125, 128, 169, 243, 256, 289, 343, 361, 512, 529, 625, 729, 841, 961, 1024, 1331, 1369, 1681, 1849, 2048, 2187, 2197, 2209, 2401, 2809, 3125, 3481, 3721, 4096, 4489, 4913, 5041, 5329, 6241, 6561, 6859, 6889, 7921, 8192, 9409, 10201, 10609, 11449, 11881, 12167, 12769, 14641 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`这些有时被称为真正的大国。` `一个适当的子集A001597年.` `等于A000961号\A008578号={x英寸A001597年\|A001221号（x） =1}-M.F.哈斯勒，2014年8月29日`
	链接	`延斯·克鲁斯·安徒生，n=1..10000时的n，a（n）表`
	配方奶粉	`a（n）=A025475号（n+1）-M.F.哈斯勒2014年8月29日` `和{n>=1}1/a（n）=和{p素数}1/（p*（p-1））=A136141号. -阿米拉姆·埃尔达尔2020年12月21日`
	MAPLE公司	`isA246547:=进程（n）` `本地ifs；` `ifs:=ifactors（n）[2]；` `如果nops（ifs）<>1，则` `假；` `其他的` `是（op（2，op（1，ifs））>1）；` `结束条件：；` `结束过程：` `对于2 do中的n` `如果是A246547（n），则` `打印（n）；` `结束条件：；` `结束do：#R.J.马塔尔2016年2月1日#或：` `isA246547:=n->非isprime（n）和nops（数量理论：-因子集（n））=1:` `选择（isA246547，[1..10000]）#彼得·卢什尼2018年5月1日`
	数学	`使用[{上限=15000}，补码[Select[Range[upto]，PrimePowerQ]，Prime[Range[PrimePi[upto]]]](哈维·P·戴尔2014年11月28日）` `选择[Range@15000，PrimePowerQ@#&！SquareFreeQ@#&](罗伯特·威尔逊v2014年12月1日）` `使用[{n=1500}，Union@Flatten@Table[Array[p^#&，Floor@Log[p，n]-1，2]，{p，Prime@Range@PrimePi@Sqrt@n}]](迈克尔·德弗利格，2018年7月6日，更快计划）`
	程序	`（PARI）对于（n=1，10^5，如果（i素数幂（n）>=2，打印1（n，“，”））；` `（PARI）m=10^5；v=[]；对于素数（p=2，平方（m），e=2；而（p^e<=m，v=concat（v，p^e））；e++））；v=vecsort（v）\\更快的程序。延斯·克鲁斯·安徒生2014年8月29日` `（SageMath）` `def A246547列表（n）：` `如果p.is_prime_power（）而不是p.is_perime（），则返回[p代表srange（2，n）中的p` `打印（A246547列表（14642））#彼得·卢什尼2023年9月16日`
	交叉参考	`基本上与A025475号.` `囊性纤维变性。A000961号,A001597年,A025528号,A051953号,A136141号,A246655型.` `有四种不同的序列可以合法地称为“大国”：A000961号（p^k，k>=0），246655英镑（p^k，k>=1），A246547号（p^k，k>=2），A025475号（p^k，k=0和k>=2）。当你提到“超级大国”时，一定要指明你指的是哪一个。此外A001597年是非平凡幂序列n^k，n>=1，k>=2-N.J.A.斯隆2018年3月24日` `上下文中的序列：A134611号 A134612号 A025475号A195942号 A125643号 A002760型` `相邻序列：A246544号 A246545号 A246546号A246548号 246549英镑 A246550型`
	关键词	`非n,容易的`
	作者	`乔格·阿恩特2014年8月29日`
	状态	`已批准`