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

Author

Gus Wiseman, Mar 01 2018

Keywords

• nonn

Comments

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

Crossrefs

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

Programs

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}]