%I#8 2021年1月25日19:04:13
%S 2,5,8,11,17,20,23,30,31,32,41,44,45,47,50,59,66,67,68,73,75,80,83,92,
%电话:97,99102103109110120124127128137138149153154157,
%电话:164165167170176179180186188191197200207211227230
%具有奇数部分的整数分区的Heinz数,其中最大的部分是奇数。
%C分区(y_1,…,y_k)的海因茨数是素数(y_1)**质数(yk)。这给出了正整数和整数分区之间的双向对应。
%F A026424(奇数长度)和A244991(奇数最大值)的交叉点。
%e分区序列及其Heinz编号开始于:
%e 2:(1)59:(17)120:(3,2,1,1,1)
%e 5:(3)66:(5,2,1)124:(11,1,1)
%e 8:(1,1,1)67:(19)125:(3,3,3)
%e 11:(5)68:(7,1,1)127:(31)
%e 17:(7)73:(21)128:(1,1,1,1,1,1,1)
%e 20:(3,1,1)75:(3,3,2)137:(33)
%e 23:(9)80:(3,1,1,1)138:(9,2,1)
%e 30:(3,2,1)83:(23)149:(35)
%e 31:(11)92:(9,1,1)153:(7,2,2)
%e 32:(1,1,1,1)97:(25)154:(5,4,1)
%e 41:(13)99:(5,2,2)157:(37)
%e 44:(5,1,1)102:(7,2,1)164:(13,1,1
%e 45:(3,2,2)103:(27)165:(5,3,2)
%e 47:(15)109:(29)167:(39)
%e 50:(3,3,1)110:(5,3,1:)170:(7,3,1.)
%t选择[Range[100],OddQ[PrimeOmega[#]*PrimePi[FactorInteger[#][[-1,1]]&]
%Y注:海因茨数在下面的括号中给出。
%Y仅奇数长度的情况是A026424。
%Y仅奇数最大值为A244991。
%Y A326846中奇数项的位置。
%Y这些分区按A340385计算。
%Y分解的版本是A340607。
%Y A000009将分区计数为奇数部分(A066208)。
%Y A027193统计奇数长度或奇数最大值的分区。
%Y A061395给出了最大质数索引。
%Y A106529列出Omega等于最大素数索引的数字。
%Y A160786统计奇数的奇数长度分区(A300272)。
%Y A339890统计奇数长度的因子分解。
%Y A340102将奇长因子分解计算为奇因子。
%Y参见A001222、A027187、A056239、A112798、A236914、A258116、A300063、A324522、A340608、A3408788、A340831。
%K nonn公司
%O 1,1号机组
%A _Gus Wiseman_,2021年1月25日
|