OFFSET
0,1
FORMULA
a(n) = 3*A002387(3n).
The next term is approximately the previous term * e^3.
MATHEMATICA
s = 0; k = 3; Do[ While[s = N[s + 1/k, 24]; s <= n, k += 3]; Print[k]; k += 3, {n, 1, 12}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jan 12 2004
EXTENSIONS
a(0) prepended and more terms added by Max Alekseyev, Sep 01 2023
STATUS
approved