login
A095710
Triangle of numbers obtained by reversing the first n digits of 1/Pi and juxtaposing.
0
0, 3, 0, 1, 3, 0, 8, 1, 3, 0, 3, 8, 1, 3, 0, 0, 3, 8, 1, 3, 0, 9, 0, 3, 8, 1, 3, 0, 8, 9, 0, 3, 8, 1, 3, 0, 8, 8, 9, 0, 3, 8, 1, 3, 0, 6, 8, 8, 9, 0, 3, 8, 1, 3, 0, 1, 6, 8, 8, 9, 0, 3, 8, 1, 3, 0, 8, 1, 6, 8, 8, 9, 0, 3, 8, 1, 3, 0, 3, 8, 1, 6, 8, 8, 9, 0, 3, 8, 1, 3, 0, 7, 3, 8, 1, 6, 8, 8, 9, 0, 3, 8, 1, 3, 0
OFFSET
1,2
EXAMPLE
0; 3,0; 1,3,0; 8,1,3,0; 3,8,1,3,0;... (reverse order of 0; 0.3; 0.31; 0.318; 0.3183;...)
MATHEMATICA
With[{d=Join[{0}, RealDigits[1/Pi, 10, 30][[1]]]}, Flatten[Table[Reverse[ Take[d, n]], {n, 20}]]] (* Harvey P. Dale, Jun 28 2012 *)
PROG
(PARI) a(n)=if(n<1, 0, default(realprecision, n+2); floor(1/Pi*10^(n-1))%10); b(n)=1+binomial(1+floor(1/2+sqrt(2*n)), 2)-n; for(n=1, 120, print1(a(b(n)), ", ")
CROSSREFS
Cf. A049541.
Sequence in context: A099174 A137297 A178117 * A216416 A291960 A160052
KEYWORD
base,easy,nonn,tabl
AUTHOR
Herman Jamke (hermanjamke(AT)fastmail.fm), Jul 07 2004
STATUS
approved