|
%I #8 May 19 2013 12:18:40
%S 3,4,19,23,134,1229,2592,16781,86497,276272,1467857,12019128,
%T 109640009,779499191,7125132728,22154897375,51434927478,176459679809,
%U 1463112365950,6028909143609,37636567227604,81302043598817,525448828820506,2183097358880841
%N Numerator of fraction equal to the continued fraction [ 3, 1, 4, 1, 5... ] (first n digits of Pi).
%H Harvey P. Dale, <a href="/A036253/b036253.txt">Table of n, a(n) for n = 1..1000</a>
%t nn=30;With[{pidg=RealDigits[Pi,10,nn][[1]]},Numerator[Table[ FromContinuedFraction[ Take[pidg,n]],{n,nn}]]] (* _Harvey P. Dale_, Oct 08 2012 *)
%Y Cf. A036254.
%K frac,nonn,base
%O 1,1
%A _Jeff Burch_
%E More terms from _Harvey P. Dale_, Oct 08 2012
|
