A296150 -id:A296150 - cp's OEIS frontend

A301899 Heinz numbers of strict knapsack partitions. Squarefree numbers such that every divisor has a different Heinz weight A056239(d).

1, 2, 3, 5, 6, 7, 10, 11, 13, 14, 15, 17, 19, 21, 22, 23, 26, 29, 31, 33, 34, 35, 37, 38, 39, 41, 42, 43, 46, 47, 51, 53, 55, 57, 58, 59, 61, 62, 65, 66, 67, 69, 71, 73, 74, 77, 78, 79, 82, 83, 85, 86, 87, 89, 91, 93, 94, 95, 97, 101, 102, 103, 105, 106, 107, 109

Offset: 1

Gus Wiseman, Mar 28 2018

nonn

An integer partition is knapsack if every distinct submultiset has a different sum. The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k).

			42 is the Heinz number of (4,2,1) which is strict and knapsack, so is in the sequence. 45 is the Heinz number of (3,2,2) which is knapsack but not strict, so is not in the sequence. 30 is the Heinz number of (3,2,1) which is strict but not knapsack, so is not in the sequence.
Sequence of strict knapsack partitions begins: (), (1), (2), (3), (21), (4), (31), (5), (6), (41), (32), (7), (8), (42), (51), (9), (61).

Cf. A000712, A005117, A056239, A108917, A112798, A122768, A275972, A276024, A284640, A296150, A299701, A299702, A299729, A301829, A301854, A301900.

wt[n_]:=If[n===1,0,Total[Cases[FactorInteger[n],{p_,k_}:>k*PrimePi[p]]]];
Select[Range[100],SquareFreeQ[#]&&UnsameQ@@wt/@Divisors[#]&]

Intersection of A299702 and A005117.

A353835 Number of distinct run-sums of the prime indices of n.

Original entry on oeis.org

0, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 2, 1, 1, 2, 1, 2, 2, 2, 1, 2, 1, 2, 1, 2, 1, 3, 1, 1, 2, 2, 2, 2, 1, 2, 2, 1, 1, 3, 1, 2, 2, 2, 1, 2, 1, 2, 2, 2, 1, 2, 2, 2, 2, 2, 1, 2, 1, 2, 1, 1, 2, 3, 1, 2, 2, 3, 1, 2, 1, 2, 2, 2, 2, 3, 1, 2, 1, 2, 1, 2, 2, 2, 2, 2, 1, 3, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 1, 3, 1, 2, 3

Offset: 1

Gus Wiseman, May 23 2022

nonn

A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.

The sequence of runs of a sequence consists of its maximal consecutive constant subsequences when read left-to-right. For example, the runs of (2,2,1,1,1,3,2,2) are (2,2), (1,1,1), (3), (2,2), with sums (4,3,3,4).

			The prime indices of 3780 are {1,1,2,2,2,3,4}, with distinct run-sums {2,3,4,6}, so a(3780) = 4.
The prime indices of 8820 are {1,1,2,2,3,4,4}, with distinct run-sums {2,3,4,8}, so a(8820) = 4.
The prime indices of 13860 are {1,1,2,2,3,4,5}, with distinct run-sums {2,3,4,5}, so a(13860) = 4.
The prime indices of 92400 are {1,1,1,1,2,3,3,4,5}, with distinct run-sums {2,4,5,6}, so a(92400) = 4.

Antti Karttunen, Table of n, a(n) for n = 1..65537
Mathematics Stack Exchange, What is a sequence run? (answered 2011-12-01)
Index entries for sequences related to prime indices in the factorization of n.

Positions of first appearances are A002110.
A version for binary expansion is A165413.
Positions of 0's and 1's are A353833, nonprime A353834, counted by A304442.
The case of all distinct run-sums is ranked by A353838, counted by A353837.
The version for compositions is A353849.
The weak version is A353861.
A001222 counts prime factors, distinct A001221.
A005811 counts runs in binary expansion.
A056239 adds up prime indices, row sums of A112798 and A296150.
A124010 gives prime signature, sorted A118914.
A300273 ranks collapsible partitions, counted by A275870.
A351014 counts distinct runs in standard compositions.
A353832 represents the operation of taking run-sums of a partition.
A353840-A353846 pertain to partition run-sum trajectory.
A353862 gives greatest run-sum of prime indices, least A353931.
A353866 ranks rucksack partitions, counted by A353864.
Cf. A071625, A073093, A116608, A175413, A181819, A333755, A353839, A353848, A353850, A353852, A353867.

Table[Length[Union[Cases[If[n==1,{},FactorInteger[n]],{p_,k_}:>PrimePi[p]*k]]],{n,100}]

pis_to_runs(n) = { my(runs=List([]), f=factor(n)); for(i=1,#f~,while(f[i,2], listput(runs,primepi(f[i,1])); f[i,2]--)); (runs); };
A353832(n) = if(1==n,n,my(pruns = pis_to_runs(n), m=1, runsum=pruns[1]); for(i=2,#pruns,if(pruns[i] == pruns[i-1], runsum += pruns[i], m *= prime(runsum); runsum = pruns[i])); (m*prime(runsum)));
A353835(n) = omega(A353832(n)); \\ Antti Karttunen, Jan 20 2025

a(n) = A001221(A353832(n)). [From formula section of A353832] - Antti Karttunen, Jan 20 2025

Data section extended to a(105) by Antti Karttunen, Jan 20 2025

A316428 Heinz numbers of integer partitions such that every part is divisible by the number of parts.

Original entry on oeis.org

1, 2, 3, 5, 7, 9, 11, 13, 17, 19, 21, 23, 29, 31, 37, 39, 41, 43, 47, 49, 53, 57, 59, 61, 67, 71, 73, 79, 83, 87, 89, 91, 97, 101, 103, 107, 109, 111, 113, 125, 127, 129, 131, 133, 137, 139, 149, 151, 157, 159, 163, 167, 169, 173, 179, 181, 183, 191, 193, 197

Offset: 1

Gus Wiseman, Jul 02 2018

nonn

The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k).

			93499 is the Heinz number of (12,8,8,4) and belongs to the sequence because each part is divisible by 4.
Sequence of partitions such that every part is divisible by the number of parts begins (1), (2), (3), (4), (2,2), (5), (6), (7), (8), (4,2), (9).

Cf. A056239, A067538, A074761, A143773, A237984, A289509, A296150, A298423, A316413.

Select[Range[200],And@@Cases[If[#==1,{},FactorInteger[#]],{p_,k_}:>Divisible[PrimePi[p],PrimeOmega[#]]]&]

A334434 Heinz number of the n-th integer partition in graded lexicographic order.

Original entry on oeis.org

1, 2, 4, 3, 8, 6, 5, 16, 12, 9, 10, 7, 32, 24, 18, 20, 15, 14, 11, 64, 48, 36, 27, 40, 30, 25, 28, 21, 22, 13, 128, 96, 72, 54, 80, 60, 45, 50, 56, 42, 35, 44, 33, 26, 17, 256, 192, 144, 108, 81, 160, 120, 90, 100, 75, 112, 84, 63, 70, 49, 88, 66, 55, 52, 39, 34, 19

Offset: 0

Gus Wiseman, May 01 2020

A permutation of the positive integers.
This is the graded reverse of the so-called "Mathematica" order (A080577, A129129).
The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions.
As a triangle with row lengths A000041, the sequence starts {{1},{2},{4,3},{8,6,5},...}, so offset is 0.

			The sequence of terms together with their prime indices begins:
    1: {}              11: {5}                 45: {2,2,3}
    2: {1}             64: {1,1,1,1,1,1}       50: {1,3,3}
    4: {1,1}           48: {1,1,1,1,2}         56: {1,1,1,4}
    3: {2}             36: {1,1,2,2}           42: {1,2,4}
    8: {1,1,1}         27: {2,2,2}             35: {3,4}
    6: {1,2}           40: {1,1,1,3}           44: {1,1,5}
    5: {3}             30: {1,2,3}             33: {2,5}
   16: {1,1,1,1}       25: {3,3}               26: {1,6}
   12: {1,1,2}         28: {1,1,4}             17: {7}
    9: {2,2}           21: {2,4}              256: {1,1,1,1,1,1,1,1}
   10: {1,3}           22: {1,5}              192: {1,1,1,1,1,1,2}
    7: {4}             13: {6}                144: {1,1,1,1,2,2}
   32: {1,1,1,1,1}    128: {1,1,1,1,1,1,1}    108: {1,1,2,2,2}
   24: {1,1,1,2}       96: {1,1,1,1,1,2}       81: {2,2,2,2}
   18: {1,2,2}         72: {1,1,1,2,2}        160: {1,1,1,1,1,3}
   20: {1,1,3}         54: {1,2,2,2}          120: {1,1,1,2,3}
   15: {2,3}           80: {1,1,1,1,3}         90: {1,2,2,3}
   14: {1,4}           60: {1,1,2,3}          100: {1,1,3,3}
Triangle begins:
    1
    2
    4   3
    8   6   5
   16  12   9  10   7
   32  24  18  20  15  14  11
   64  48  36  27  40  30  25  28  21  22  13
  128  96  72  54  80  60  45  50  56  42  35  44  33  26  17
  ...
This corresponds to the tetrangle:
                  0
                 (1)
               (11)(2)
             (111)(21)(3)
        (1111)(211)(22)(31)(4)
  (11111)(2111)(221)(311)(32)(41)(5)

Alois P. Heinz, Rows n = 0..28, flattened
OEIS Wiki, Orderings of partitions
Wikiversity, Lexicographic and colexicographic order

Row lengths are A000041.
The dual version (sum/revlex) is A129129.
The constructive version is A193073.
Compositions under the same order are A228351.
The length-sensitive version is A334433.
The version for reversed (weakly increasing) partitions is A334437.
Lexicographically ordered reversed partitions are A026791.
Reversed partitions in Abramowitz-Stegun order (sum/length/lex) are A036036.
Reverse-lexicographically ordered partitions are A080577.
Sorting reversed partitions by Heinz number gives A112798.
Graded Heinz numbers are A215366.
Sorting partitions by Heinz number gives A296150.
Row sums give A145519.
Cf. A036037, A049085, A056239, A066099, A185974, A211992, A228100, A228531, A333219, A334301, A334302, A334435, A334436, A334438, A334439.

T:= n-> map(p-> mul(ithprime(i), i=p), combinat[partition](n))[]:
seq(T(n), n=0..8);  # Alois P. Heinz, Jan 26 2025

lexsort[f_,c_]:=OrderedQ[PadRight[{f,c}]];
Join@@Table[Times@@Prime/@#&/@Sort[IntegerPartitions[n],lexsort],{n,0,8}]
- or -
Join@@Table[Times@@Prime/@#&/@Reverse[IntegerPartitions[n]],{n,0,8}]

A001222(a(n)) appears to be A049085(n).

A334436 Heinz numbers of all reversed integer partitions sorted first by sum and then reverse-lexicographically.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 8, 7, 9, 10, 12, 16, 11, 15, 14, 18, 20, 24, 32, 13, 25, 21, 27, 22, 30, 28, 36, 40, 48, 64, 17, 35, 33, 45, 26, 50, 42, 54, 44, 60, 56, 72, 80, 96, 128, 19, 49, 55, 39, 75, 63, 81, 34, 70, 66, 90, 52, 100, 84, 108, 88, 120, 112, 144, 160, 192, 256

Offset: 0

Gus Wiseman, May 02 2020

First differs from A334435 at a(22) = 27, A334435(22) = 22.
A permutation of the positive integers.
Reversed integer partitions are finite weakly increasing sequences of positive integers. For non-reversed partitions, see A129129 and A228531.
This is the so-called "Mathematica" order (A080577).
The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions.

			The sequence of terms together with their prime indices begins:
    1: {}            32: {1,1,1,1,1}       42: {1,2,4}
    2: {1}           13: {6}               54: {1,2,2,2}
    3: {2}           25: {3,3}             44: {1,1,5}
    4: {1,1}         21: {2,4}             60: {1,1,2,3}
    5: {3}           27: {2,2,2}           56: {1,1,1,4}
    6: {1,2}         22: {1,5}             72: {1,1,1,2,2}
    8: {1,1,1}       30: {1,2,3}           80: {1,1,1,1,3}
    7: {4}           28: {1,1,4}           96: {1,1,1,1,1,2}
    9: {2,2}         36: {1,1,2,2}        128: {1,1,1,1,1,1,1}
   10: {1,3}         40: {1,1,1,3}         19: {8}
   12: {1,1,2}       48: {1,1,1,1,2}       49: {4,4}
   16: {1,1,1,1}     64: {1,1,1,1,1,1}     55: {3,5}
   11: {5}           17: {7}               39: {2,6}
   15: {2,3}         35: {3,4}             75: {2,3,3}
   14: {1,4}         33: {2,5}             63: {2,2,4}
   18: {1,2,2}       45: {2,2,3}           81: {2,2,2,2}
   20: {1,1,3}       26: {1,6}             34: {1,7}
   24: {1,1,1,2}     50: {1,3,3}           70: {1,3,4}
Triangle begins:
   1
   2
   3   4
   5   6   8
   7   9  10  12  16
  11  15  14  18  20  24  32
  13  25  21  27  22  30  28  36  40  48  64
  17  35  33  45  26  50  42  54  44  60  56  72  80  96 128
This corresponds to the following tetrangle:
                  0
                 (1)
               (2)(11)
             (3)(12)(111)
        (4)(22)(13)(112)(1111)
  (5)(23)(14)(122)(113)(1112)(11111)

Wikiversity, Lexicographic and colexicographic order

Row lengths are A000041.
Compositions under the same order are A066099 (triangle).
The version for non-reversed partitions is A129129.
The constructive version is A228531.
The lengths of these partitions are A333486.
The length-sensitive version is A334435.
The dual version (sum/lex) is A334437.
Lexicographically ordered reversed partitions are A026791.
Reversed partitions in Abramowitz-Stegun (sum/length/lex) order are A036036.
Partitions in increasing-length colexicographic order (sum/length/colex) are A036037.
Reverse-lexicographically ordered partitions are A080577.
Sorting reversed partitions by Heinz number gives A112798.
Graded lexicographically ordered partitions are A193073.
Partitions in colexicographic order (sum/colex) are A211992.
Graded Heinz numbers are A215366.
Sorting partitions by Heinz number gives A296150.
Partitions in dual Abramowitz-Stegun (sum/length/revlex) order are A334439.
Cf. A056239, A124734, A185974, A228100, A333219, A334301, A334302, A334433, A334434, A334438.

lexsort[f_,c_]:=OrderedQ[PadRight[{f,c}]];
Table[Times@@Prime/@#&/@Reverse[Sort[Sort/@IntegerPartitions[n],lexsort]],{n,0,8}]

A001222(a(n)) = A333486(n).

A367771 Number of ways to choose a different prime index of each prime index of 2n + 1.

Original entry on oeis.org

1, 1, 1, 2, 0, 1, 2, 1, 1, 3, 0, 2, 0, 0, 2, 1, 1, 2, 3, 1, 1, 2, 0, 2, 0, 1, 4, 1, 0, 1, 3, 0, 1, 1, 2, 3, 2, 0, 2, 2, 0, 1, 1, 1, 4, 2, 1, 3, 2, 0, 2, 3, 0, 3, 1, 1, 3, 0, 0, 2, 0, 1, 0, 1, 1, 5, 0, 0, 2, 2, 2, 2, 2, 0, 2, 4, 0, 1, 1, 0, 4, 2, 1, 2, 2, 0, 4

Offset: 0

Gus Wiseman, Dec 12 2023

nonn

A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.

			The prime indices of prime indices of 427 = 2*213 + 1 are {{1,1},{1,2,2}}, with four ways to choose (1,2), so a(213) = 4.
The prime indices of prime indices of 1469 = 2*734 + 1 are {{1,2},{1,2,3}}, with four choices (1,2), (1,3), (2,1), (2,3), so a(734) = 4.

The "extended" version below includes alternating zeros at even positions.
Extended positions of zeros are A355529, binary A367907.
The extended version for binary indices is A367905.
Extended positions of nonzeros are A368100, binary A367906.
Extended positions of ones are A368101, binary A367908.
The extended version without distinctness is A355741, for multisets A355744.
A058891 counts set-systems, covering A003465, connected A323818.
A112798 lists prime indices, reverse A296150, length A001222, sum A056239.
A124010 gives prime signature, sorted A118914, length A001221, sum A001222.
Cf. A007716, A355739, A355740, A355745, A367901, A367902, A367903.

prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n], {p_,k_}:>Table[PrimePi[p],{k}]]]];
Table[Length[Select[Tuples[prix/@prix[2n+1]], UnsameQ@@#&]],{n,0,100}]

A353834 Nonprime numbers whose prime indices have all equal run-sums.

Original entry on oeis.org

1, 4, 8, 9, 12, 16, 25, 27, 32, 40, 49, 63, 64, 81, 112, 121, 125, 128, 144, 169, 243, 256, 289, 325, 343, 351, 352, 361, 512, 529, 625, 675, 729, 832, 841, 931, 961, 1008, 1024, 1331, 1369, 1539, 1600, 1681, 1728, 1849, 2048, 2176, 2187, 2197, 2209, 2401

Offset: 1

Gus Wiseman, May 26 2022

nonn

A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.

The sequence of runs of a sequence consists of its maximal consecutive constant subsequences when read left-to-right. For example, the runs of (2,2,1,1,1,3,2,2) are (2,2), (1,1,1), (3), (2,2), with sums (4,3,3,4).

			The terms together with their prime indices begin:
     1: {}
     4: {1,1}
     8: {1,1,1}
     9: {2,2}
    12: {1,1,2}
    16: {1,1,1,1}
    25: {3,3}
    27: {2,2,2}
    32: {1,1,1,1,1}
    40: {1,1,1,3}
    49: {4,4}
    63: {2,2,4}
    64: {1,1,1,1,1,1}
    81: {2,2,2,2}
   112: {1,1,1,1,4}
   121: {5,5}
   125: {3,3,3}
   128: {1,1,1,1,1,1,1}
For example, 675 is in the sequence because its prime indices {2,2,2,3,3} have run-sums (6,6).

For equal run-lengths we have A072774\A000040, counted by A047966(n)-1.
These partitions are counted by A304442(n) - 1.
These are the nonprime positions of prime powers in A353832.
Including the primes gives A353833.
For distinct run-sums we have A353838\A000040, counted by A353837(n)-1.
For compositions we have A353848\A000079, counted by A353851(n)-1.
A001222 counts prime factors, distinct A001221.
A005811 counts runs in binary expansion, distinct run-lengths A165413.
A056239 adds up prime indices, row sums of A112798 and A296150.
A124010 gives prime signature, sorted A118914.
A300273 ranks collapsible partitions, counted by A275870.
A353835 counts distinct run-sums of prime indices, weak A353861.
A353840-A353846 pertain to partition run-sum trajectory.
A353862 gives greatest run-sum of prime indices, least A353931.
A353866 ranks rucksack partitions, counted by A353864.
Cf. A000005, A000961, A007947, A025475, A071625, A073093, A323014, A353839.

Select[Range[100],!PrimeQ[#]&&SameQ@@Cases[FactorInteger[#],{p_,k_}:>PrimePi[p]*k]&]

from itertools import count, islice
from sympy import factorint, primepi
def A353848_gen(startvalue=1): # generator of terms >= startvalue
    return filter(lambda n: n == 1 or (sum((f:=factorint(n)).values()) > 1 and len(set(primepi(p)*e for p, e in f.items())) <= 1), count(max(startvalue,1)))
A353848_list = list(islice(A353848_gen(),30)) # Chai Wah Wu, May 27 2022

A367224 Numbers m with a divisor whose prime indices sum to bigomega(m).

Original entry on oeis.org

1, 2, 4, 6, 8, 9, 12, 15, 16, 18, 20, 21, 24, 30, 32, 33, 36, 39, 40, 42, 45, 48, 50, 51, 54, 56, 57, 60, 64, 66, 69, 70, 72, 75, 78, 80, 81, 84, 87, 90, 93, 96, 100, 102, 105, 108, 110, 111, 112, 114, 120, 123, 125, 126, 128, 129, 130, 132, 135, 138, 140, 141

Offset: 1

Gus Wiseman, Nov 14 2023

nonn

Also numbers m whose prime indices have a submultiset summing to bigomega(m).
A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.
These are the Heinz numbers of the partitions counted by A367212.

			The prime indices of 24 are {1,1,1,2} with submultiset {1,1,2} summing to 4, so 24 is in the sequence.
The terms together with their prime indices begin:
    1: {}
    2: {1}
    4: {1,1}
    6: {1,2}
    8: {1,1,1}
    9: {2,2}
   12: {1,1,2}
   15: {2,3}
   16: {1,1,1,1}
   18: {1,2,2}
   20: {1,1,3}
   21: {2,4}
   24: {1,1,1,2}
   30: {1,2,3}
   32: {1,1,1,1,1}

The following sequences count and rank integer partitions and finite sets according to whether their length is a subset-sum or linear combination of the parts. The current sequence is starred.
               sum-full   sum-free   comb-full  comb-free
              -------------------------------------------
  partitions:  A367212    A367213    A367218    A367219
  strict:      A367214    A367215    A367220    A367221
  subsets:     A367216    A367217    A367222    A367223
  ranks:       A367224*   A367225    A367226    A367227
A000700 counts self-conjugate partitions, ranks A088902.
A002865 counts partitions whose length is a part, ranks A325761.
A005117 ranks strict integer partitions, counted by A000009.
A066208 ranks partitions into odd parts, also counted by A000009.
A112798 lists prime indices, reverse A296150, length A001222, sum A056239.
A126796 counts complete partitions, ranks A325781.
A229816 counts partitions whose length is not a part, ranks A367107.
A237668 counts sum-full partitions, ranks A364532.
Triangles:
A046663 counts partitions of n without a subset-sum k, strict A365663.
A365543 counts partitions of n with a subset-sum k, strict A365661.
A365658 counts partitions by number of subset-sums, strict A365832.
Cf. A000720, A055396, A061395, A106529, A299729, A304792, A363225, A365830.

prix[n_]:=If[n==1, {}, Flatten[Cases[FactorInteger[n], {p_,k_}:>Table[PrimePi[p], {k}]]]];
Select[Range[100], MemberQ[Total/@prix/@Divisors[#], PrimeOmega[#]]&]

A367225 Numbers m without a divisor whose prime indices sum to bigomega(m).

Original entry on oeis.org

3, 5, 7, 10, 11, 13, 14, 17, 19, 22, 23, 25, 26, 27, 28, 29, 31, 34, 35, 37, 38, 41, 43, 44, 46, 47, 49, 52, 53, 55, 58, 59, 61, 62, 63, 65, 67, 68, 71, 73, 74, 76, 77, 79, 82, 83, 85, 86, 88, 89, 91, 92, 94, 95, 97, 98, 99, 101, 103, 104, 106, 107, 109, 113

Offset: 1

Gus Wiseman, Nov 15 2023

nonn

Also numbers m whose prime indices do not have a submultiset summing to bigomega(m).
A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.
These are the Heinz numbers of the partitions counted by A367213.

			The prime indices of 24 are {1,1,1,2} with submultiset {1,1,2} summing to 4, so 24 is not in the sequence.
The terms together with their prime indices begin:
     3: {2}        29: {10}       58: {1,10}
     5: {3}        31: {11}       59: {17}
     7: {4}        34: {1,7}      61: {18}
    10: {1,3}      35: {3,4}      62: {1,11}
    11: {5}        37: {12}       63: {2,2,4}
    13: {6}        38: {1,8}      65: {3,6}
    14: {1,4}      41: {13}       67: {19}
    17: {7}        43: {14}       68: {1,1,7}
    19: {8}        44: {1,1,5}    71: {20}
    22: {1,5}      46: {1,9}      73: {21}
    23: {9}        47: {15}       74: {1,12}
    25: {3,3}      49: {4,4}      76: {1,1,8}
    26: {1,6}      52: {1,1,6}    77: {4,5}
    27: {2,2,2}    53: {16}       79: {22}
    28: {1,1,4}    55: {3,5}      82: {1,13}

The following sequences count and rank integer partitions and finite sets according to whether their length is a subset-sum or linear combination of the parts. The current sequence is starred.
               sum-full   sum-free   comb-full  comb-free
              -------------------------------------------
  partitions:  A367212    A367213    A367218    A367219
  strict:      A367214    A367215    A367220    A367221
  subsets:     A367216    A367217    A367222    A367223
  ranks:       A367224    A367225*   A367226    A367227
A000700 counts self-conjugate partitions, ranks A088902.
A108917 counts knapsack partitions, ranks A299702, strict A275972.
A112798 lists prime indices, reverse A296150, length A001222, sum A056239.
A229816 counts partitions whose length is not a part, ranks A367107.
A237667 counts sum-free partitions, ranks A364531.
A365924 counts incomplete partitions, ranks A365830.
Triangles:
A046663 counts partitions of n without a subset-sum k, strict A365663.
A365543 counts partitions of n with a subset-sum k, strict A365661.
A365658 counts partitions by number of subset-sums, strict A365832.
Cf. A000720, A055396, A061395, A106529, A288728, A304792, A325761, A325781, A364345, A364347.

prix[n_]:=If[n==1,{}, Flatten[Cases[FactorInteger[n], {p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100], FreeQ[Total/@prix/@Divisors[#], PrimeOmega[#]]&]

A352486 Heinz numbers of non-self-conjugate integer partitions.

Original entry on oeis.org

3, 4, 5, 7, 8, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 21, 22, 23, 24, 25, 26, 27, 28, 29, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73

Offset: 1

Gus Wiseman, Mar 20 2022

nonn

The Heinz number of a partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions. The sequence lists all Heinz numbers of partitions whose Heinz number is different from that of their conjugate.

			The terms together with their prime indices begin:
   3: (2)
   4: (1,1)
   5: (3)
   7: (4)
   8: (1,1,1)
  10: (3,1)
  11: (5)
  12: (2,1,1)
  13: (6)
  14: (4,1)
  15: (3,2)
  16: (1,1,1,1)
  17: (7)
  18: (2,2,1)
For example, the self-conjugate partition (4,3,3,1) has Heinz number 350, so 350 is not in the sequence.

The complement is A088902, counted by A000700.
These partitions are counted by A330644.
These are the positions of nonzero terms in A352491.
A000041 counts integer partitions, strict A000009.
A098825 counts permutations by unfixed points.
A238349 counts compositions by fixed points, rank statistic A352512.
A325039 counts partitions w/ same product as conjugate, ranked by A325040.
A352523 counts compositions by unfixed points, rank statistic A352513.
Heinz number (rank) and partition:
- A003963 = product of partition, conjugate A329382
- A008480 = number of permutations of partition, conjugate A321648.
- A056239 = sum of partition
- A122111 = rank of conjugate partition
- A296150 = parts of partition, reverse A112798, conjugate A321649
- A352487 = less than conjugate, counted by A000701
- A352488 = greater than or equal to conjugate, counted by A046682
- A352489 = less than or equal to conjugate, counted by A046682
- A352490 = greater than conjugate, counted by A000701
Cf. A000720, A026424, A120383, A175508, A195017, A238745, A301987, A304360, A316524,  A324846, A350841.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
conj[y_]:=If[Length[y0]==0,y,Table[Length[Select[y,#>=k&]],{k,1,Max[y]}]];
Select[Range[100],#!=Times@@Prime/@conj[primeMS[#]]&]

a(n) != A122111(a(n)).

cp's OEIS Frontend

A301899 Heinz numbers of strict knapsack partitions. Squarefree numbers such that every divisor has a different Heinz weight A056239(d).

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A353835 Number of distinct run-sums of the prime indices of n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

Extensions

A316428 Heinz numbers of integer partitions such that every part is divisible by the number of parts.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A334434 Heinz number of the n-th integer partition in graded lexicographic order.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Formula

A334436 Heinz numbers of all reversed integer partitions sorted first by sum and then reverse-lexicographically.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A367771 Number of ways to choose a different prime index of each prime index of 2n + 1.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A353834 Nonprime numbers whose prime indices have all equal run-sums.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Python

A367224 Numbers m with a divisor whose prime indices sum to bigomega(m).

Views

Author

Keywords

Comments