login
A195603
Numerator of floor(Pi*10^n)/10^n.
1
3, 31, 157, 3141, 6283, 314159, 392699, 15707963, 62831853, 3141592653, 6283185307, 157079632679, 3141592653589, 31415926535897, 314159265358979, 3141592653589793, 7853981633974483, 314159265358979323, 1570796326794896619, 981747704246810387
OFFSET
0,1
MATHEMATICA
nn=50; Numerator[With[{pidgs=N[Pi, nn]}, Table[IntegerPart[pidgs 10^(n-1)]/10^n, {n, nn}]]] (* Harvey P. Dale, Sep 21 2011 *)
PROG
(PARI) a(n, c=Pi)=numerator(c*10^n\1/10^n) \\ M. F. Hasler, Sep 21 2011
CROSSREFS
Cf. A011545.
Sequence in context: A064055 A227049 A078604 * A089286 A089287 A125085
KEYWORD
nonn
AUTHOR
M. F. Hasler, following a suggestion by Eric Angelini, Sep 21 2011
STATUS
approved