login
A024582
a(n) = floor( a(n-1)/(Pi - 3) ) with n>0, a(0)=1.
1
1, 7, 49, 346, 2443, 17253, 121849, 860560, 6077716, 42923950, 303150968, 2141007745, 15120895687, 106791526987, 754216580306, 5326664633964, 37619639853603, 265689207030405
OFFSET
0,2
LINKS
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
Sequence in context: A050737 A195908 A033143 * A024587 A351057 A240721
KEYWORD
nonn
STATUS
approved