A095712 Triangle of numbers obtained by reversing the first n digits of 1/e and juxtaposing.

0, 3, 0, 6, 3, 0, 7, 6, 3, 0, 8, 7, 6, 3, 0, 7, 8, 7, 6, 3, 0, 9, 7, 8, 7, 6, 3, 0, 4, 9, 7, 8, 7, 6, 3, 0, 4, 4, 9, 7, 8, 7, 6, 3, 0, 1, 4, 4, 9, 7, 8, 7, 6, 3, 0, 1, 1, 4, 4, 9, 7, 8, 7, 6, 3, 0, 7, 1, 1, 4, 4, 9, 7, 8, 7, 6, 3, 0, 1, 7, 1, 1, 4, 4, 9, 7, 8, 7, 6, 3, 0, 4, 1, 7, 1, 1, 4, 4, 9, 7, 8, 7, 6, 3, 0

Offset

1,2

Links

Table of n, a(n) for n=1..105.

Example

Triangle begins:
  0;
  3,0;
  6,3,0;
  7,6,3,0;
  8,7,6,3,0;
  ... (reverse order of 0; 0.3; 0.36; 0.367; 0.3678;...)

Mathematica

Module[{nn=20, er}, er=Join[{0}, RealDigits[1/E, 10, nn][[1]]]; Table[Reverse[Take[er, n]], {n, nn+1}]]//Flatten (* Harvey P. Dale, Jun 19 2025 *)

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. A068985.

Sequence in context: A113062 A259659 A005889 * A382521 A085753 A120008

Adjacent sequences: A095709 A095710 A095711 * A095713 A095714 A095715

Keyword

base,easy,nonn,tabl

Author

Herman Jamke (hermanjamke(AT)fastmail.fm), Jul 07 2004

Status

approved