A273201-OEIS公司

A273201型

类素数幂但非素数幂的整数。

21, 33, 39, 65, 85, 95, 115, 133, 145, 155, 161, 185, 203, 205, 215, 217, 235, 259, 261, 265, 279, 287, 295, 301, 305, 329, 335, 341, 355, 365, 371, 395, 407, 413, 415, 427, 445, 451, 469, 473, 481, 485, 497 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`对于整数n>0而不是单位，我们将DTD（n）定义为n的除数的差分表。如果表中的所有条目都为正，则DTD（n）为正；如果表中所有行和所有列都不减（从左到右和从上到下读取），则称DTD（m）为单调。` `我们定义整数n为素数幂型当且仅当DTD（n）为正且单调。所有主要权力（在A246655型（但不是指A000961号))是素数幂型整数。顺序A273200型提供素数幂型整数。此序列(A273201型)列出了类似素数幂但不是素数幂的整数。` `因此我们有了包裹体A000040型<A246655型<A273200型和工会A273200型=2013年2月U型A246655型。DTD为正但不单调的整数列在A273199型。DTD为正的整数列在A273130型.`
	链接	`n=1..43时的n，a（n）表。`
	例子	`95是按此顺序排列的，因为95的DTD具有正条目和不减少的行和列：` `[ 1 5 19 95]` `[ 4 14 76]` `[10 62]` `[52]`
	数学	`pplikeQ[n_]：=模块[{T，DTD，DTD2}，如果[n==1\|\|PrimePowerQ[n]，返回[False]]；T=除数[n]；DTD=表[差异[T，k]，{k，0，长度[T]-1}]；如果[AnyTrue[Flatten[DTD]，NonPositive]，则返回[False]]；DTD2=转置[PadRight[#，Length[T]，Infinity]&/@DTD]；AllTrue[DTD，OrderedQ]&&AllTrue[PTD2，Ordered Q]]；` `选择[Range[500]，pplikeQ](Jean-François Alcover公司2019年6月28日）`
	黄体脂酮素	`（贤人）#使用[is_prime_power_like来自A273200型]` `#比较中的脚本A273200型.` `定义为_A273201型（n）：` `返回非is_prime_power（n）和is_prime_power_like（n）` `打印（列表（过滤器（是_A273201型，范围（1500）））`
	交叉参考	`囊性纤维变性。A000040型，A246655型，A273102型，A273130型，A273199型，A273200型.` `上下文中的序列：A368949型 A298855型 A354813型A260730型 A119973号 A279229型` `相邻序列：A273198型 A273199型 A273200型A273202型 A273203型 A273204型`
	关键词	`非n`
	作者	`彼得·卢什尼2016年5月17日`
	状态	`已批准`