A300271 Smallest Heinz number of a partition obtained from y by removing one square from its Young diagram, where y is the integer partition with Heinz number n > 1.

1, 2, 2, 3, 3, 5, 4, 6, 5, 7, 6, 11, 7, 9, 8, 13, 9, 17, 10, 14, 11, 19, 12, 15, 13, 18, 14, 23, 15, 29, 16, 21, 17, 21, 18, 31, 19, 26, 20, 37, 21, 41, 22, 27, 23, 43, 24, 35, 25, 34, 26, 47, 27, 33, 28, 38, 29, 53, 30, 59, 31, 42, 32, 39, 33, 61, 34, 46

Offset

2,2

Comments

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

Links

Table of n, a(n) for n=2..69.

Mathematica

dip[n_]:=Min@@Table[n/q*If[q===2, 1, NextPrime[q, -1]], {q, Select[Divisors[n], PrimeQ]}];
Table[dip[n], {n, 2, 50}]

Crossrefs

Cf. A000041, A000085, A001221, A005117, A056239, A094457, A112798, A122111, A153452, A215366, A238690, A296150, A299925.

Sequence in context: A070230 A007150 A213634 * A252461 A323608 A122352

Adjacent sequences: A300268 A300269 A300270 * A300272 A300273 A300274

Keyword

nonn

Author

Gus Wiseman, Mar 01 2018

Status

approved