A036254 Denominator of fraction equal to the continued fraction [ 3, 1, 4, 1, 5... ] (first n digits of Pi).
1, 1, 5, 6, 35, 321, 677, 4383, 22592, 72159, 383387, 3139255, 28636682, 203596029, 1861000943, 5786598858, 13434198659, 46089194835, 382147757339, 1574680224191, 9830229102485, 21235138429161, 137241059677451, 570199377138965, 1847839191094346
Offset: 1
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A036253.
Programs
-
Mathematica
nn=50;With[{pids=RealDigits[Pi,10,nn][[1]]},Denominator[Table[ FromContinuedFraction[ Take[pids,n]],{n,nn}]]] (* Harvey P. Dale, Feb 09 2013 *)
Extensions
More terms from Harvey P. Dale, Feb 09 2013