OFFSET
0,4
COMMENTS
Included for completeness. A001466 is the main entry.
MATHEMATICA
lst={}; k=N[(Pi), 1000]; Do[s=Ceiling[1/k]; AppendTo[lst, s]; k=k-1/s, {n, 12}]; lst (* based on the Mma program from Vladimir Joseph Stephan Orlovsky in A001466 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Apr 21 2012
STATUS
approved