OFFSET
0,2
LINKS
Clark Kimberling, Table of n, a(n) for n = 0..250
MATHEMATICA
a[0] = 1; a[n_] := Floor[a[n - 1]/FractionalPart[Pi]];
Table[a[n], {n, 0, 30}]
(* Clark Kimberling, Aug 18 2012 *)
NestList[Floor[#/(Pi-3)]&, 1, 20] (* Harvey P. Dale, Aug 22 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved