OFFSET
1,1
MATHEMATICA
Table[RealDigits[Pi n, 10, 20][[1, 1]], {n, 120}] (* Harvey P. Dale, Dec 31 2021 *)
PROG
(PARI) a(n) = digits(floor(n*Pi))[1]; \\ Michel Marcus, May 08 2016
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, May 12 2004
STATUS
approved