login
A095711
Triangle of numbers obtained by reversing the first n digits of e and juxtaposing.
0
2, 7, 2, 1, 7, 2, 8, 1, 7, 2, 2, 8, 1, 7, 2, 8, 2, 8, 1, 7, 2, 1, 8, 2, 8, 1, 7, 2, 8, 1, 8, 2, 8, 1, 7, 2, 2, 8, 1, 8, 2, 8, 1, 7, 2, 8, 2, 8, 1, 8, 2, 8, 1, 7, 2, 4, 8, 2, 8, 1, 8, 2, 8, 1, 7, 2, 5, 4, 8, 2, 8, 1, 8, 2, 8, 1, 7, 2, 9, 5, 4, 8, 2, 8, 1, 8, 2, 8, 1, 7, 2, 0, 9, 5, 4, 8, 2, 8, 1, 8, 2, 8, 1, 7, 2
OFFSET
1,1
EXAMPLE
2; 7,2; 1,7,2; 8,1,7,2; 2,8,1,7,2;... (reverse order of 2; 2.7; 2.71; 2.718; 2.7182;...)
MATHEMATICA
Module[{nn=20, e}, e=RealDigits[E, 10, (nn(nn+1))/2][[1]]; Reverse/@Table[ Take[ e, n], {n, nn}]]//Flatten (* Harvey P. Dale, Apr 19 2020 *)
PROG
(PARI) a(n)=if(n<1, 0, default(realprecision, n+2); floor(exp(1)*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. A001113.
Sequence in context: A195726 A095194 A254251 * A102886 A204382 A072981
KEYWORD
base,easy,nonn,tabl
AUTHOR
Herman Jamke (hermanjamke(AT)fastmail.fm), Jul 07 2004
STATUS
approved