OFFSET
1,3
COMMENTS
Logarithmic transform applied twice to A000166.
MATHEMATICA
nmax = 23; CoefficientList[Series[Log[1 - x - Log[1 - x]], {x, 0, nmax}], x] Range[0, nmax]! // Rest
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Jan 20 2020
STATUS
approved