A036253 Numerator of fraction equal to the continued fraction [ 3, 1, 4, 1, 5... ] (first n digits of Pi).
3, 4, 19, 23, 134, 1229, 2592, 16781, 86497, 276272, 1467857, 12019128, 109640009, 779499191, 7125132728, 22154897375, 51434927478, 176459679809, 1463112365950, 6028909143609, 37636567227604, 81302043598817, 525448828820506, 2183097358880841
Offset: 1
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A036254.
Programs
-
Mathematica
nn=30;With[{pidg=RealDigits[Pi,10,nn][[1]]},Numerator[Table[ FromContinuedFraction[ Take[pidg,n]],{n,nn}]]] (* Harvey P. Dale, Oct 08 2012 *)
Extensions
More terms from Harvey P. Dale, Oct 08 2012