A238461 Greatest number k such that A000009(k) <= n.

2, 4, 5, 6, 7, 8, 8, 9, 9, 10, 10, 11, 11, 11, 12, 12, 12, 13, 13, 13, 13, 14, 14, 14, 14, 14, 15, 15, 15, 15, 15, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 17, 17, 17, 17, 18, 18, 18, 18, 18, 18, 18, 18, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22

Offset

1,1

Comments

Inverse of A000009, the sequence of "restricted" partitions (partitions of integers into distinct parts).

Links

Jean-François Alcover, Table of n, a(n) for n = 1..1000

Example

q(12) = 15, therefore a(15) = 12.

Mathematica

a[n_] := For[k = 1, True, k++, If[PartitionsQ[k] > n, Return[k-1]]]; Table[a[n], {n, 100}]

Crossrefs

Cf. A000009, A000041, A198194.

Sequence in context: A344587 A100006 A196262 * A195994 A182815 A196252

Adjacent sequences: A238458 A238459 A238460 * A238462 A238463 A238464

Keyword

nonn

Author

Jean-François Alcover, Feb 27 2014

Status

approved