A342525 Heinz numbers of integer partitions with strictly decreasing first quotients.

1, 2, 3, 4, 5, 6, 7, 9, 10, 11, 13, 14, 15, 17, 18, 19, 21, 22, 23, 25, 26, 29, 30, 31, 33, 34, 35, 37, 38, 39, 41, 43, 46, 47, 49, 50, 51, 53, 55, 57, 58, 59, 61, 62, 65, 67, 69, 70, 71, 73, 74, 75, 77, 79, 82, 83, 85, 86, 87, 89, 91, 93, 94, 95, 97, 98

Offset: 1

Author

Gus Wiseman, Mar 23 2021

Keywords

• nonn

Comments

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 first quotients of a sequence are defined as if the sequence were an increasing divisor chain, so for example the first quotients of (6,3,1) are (1/2,1/3).

Examples

			The prime indices of 150 are {1,2,3,3}, with first quotients (2,3/2,1), so 150 is in the sequence.
Most small numbers are in the sequence, but the sequence of non-terms together with their prime indices begins:
    8: {1,1,1}
   12: {1,1,2}
   16: {1,1,1,1}
   20: {1,1,3}
   24: {1,1,1,2}
   27: {2,2,2}
   28: {1,1,4}
   32: {1,1,1,1,1}
   36: {1,1,2,2}
   40: {1,1,1,3}
   42: {1,2,4}
   44: {1,1,5}
   45: {2,2,3}
   48: {1,1,1,1,2}
		

Links

• Eric Weisstein's World of Mathematics, Logarithmically Concave Sequence.
• Gus Wiseman, Sequences counting and ranking integer partitions by the differences of their successive parts.
• Gus Wiseman, Sequences counting and ranking partitions and compositions by their differences and quotients.

Crossrefs

For multiplicities (prime signature) instead of quotients we have A304686.

For differences instead of quotients we have A325457 (count: A320470).

The version counting strict divisor chains is A342086.

These partitions are counted by A342499 (strict: A342518, ordered: A342494).

The strictly increasing version is A342524.

The weakly decreasing version is A342526.

A001055 counts factorizations (strict: A045778, ordered: A074206).

A003238 counts chains of divisors summing to n - 1 (strict: A122651).

A167865 counts strict chains of divisors > 1 summing to n.

A318991/A318992 rank reversed partitions with/without integer quotients.

A342098 counts (strict) partitions with all adjacent parts x > 2y.

Cf. A056239, A067824, A112798, A124010, A130091, A169594, A253249, A325351, A325352, A325405, A334997, A342530.

Programs

Mathematica

primeptn[n_]:=If[n==1,{},Reverse[Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]]];
Select[Range[100],Greater@@Divide@@@Reverse/@Partition[primeptn[#],2,1]&]