OFFSET
1,1
FORMULA
The next term is approximately the previous term * e^3.
MATHEMATICA
s = 0; k = 2; Do[ While[s = N[s + 1/k, 24]; s <= n, k += 3]; Print[k]; k += 3, {n, 1, 7}]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Robert G. Wilson v, Jan 12 2004
EXTENSIONS
a(8)-a(9) from Hugo Pfoertner, Dec 26 2019
STATUS
approved