%I#4 2019年5月31日03:44:36

%S 1,2,3,5,7,10,11,13,14,17,19,22,23,26,29,31,33,34,37,38,39,41,43,46，

%电话：47,51,53,57,58,59,61,62,67,69,71,73,74,79,82,83,85,86,87,89,93,94,95，

%电话：97101103106107109111113115118122123127129130131

%具有严格递增差的整数分区的N个Heinz数（最后一部分取为0）。

%整数分区的Heinz数（y_1，…，y_k）是素数（y_1）**质数（yk）。

%C序列的差异被定义为序列在增加，因此例如（6,3,1）的差异（最后一部分取为0）是（-3，-2，-1）。

%C A179269给出了这些分区的总和计数。

%H Gus Wiseman，<a href=“/A325325/A325325.txt”>序列根据连续部分的差异对整数分区进行计数和排序</a>

%e项的序列及其素数开始于：

%e1:{}

%e2:{1}

%电子3:{2}

%电子5:{3}

%电子7:{4}

%e 10:{1,3}

%e 11:{5}

%e 13:{6}

%e 14:{1,4}

%e 17:{7}

%e 19:{8}

%e 22：{1,5}

%e 23：{9}

%e 26：{1,6}

%e 29：{10}

%e 31：{11}

%e 33：{2,5}

%e 34：{1,7}

%e 37：{12}

%e 38：{1,8}

%t primeptn[n_]：=如果[n==1，{}，Reverse[Flatten[Cases[FactorInteger[n]，{p_，k_}:>表[PrimePi[p]，{k}]]]；

%t选择[Range[100]，Less@@Differences[Append[primeptn[#]，0]&]

%Y A005117的子序列。

%Y请参阅A007294、A056239、A112798、A179269、A325327、A325362、A3253654、A325377、A323388、A325390、A325295、A32539、A325456、A325461。

%K nonn公司

%O 1,2号机组

%A _Gus Wiseman_，2019年5月3日