A084674 Products of the digits of e excluding 0.

2, 14, 14, 112, 224, 1792, 1792, 14336, 28672, 229376, 917504, 4587520, 41287680, 165150720, 825753600, 1651507200, 4954521600, 24772608000, 74317824000, 445906944000, 891813888000, 7134511104000, 49941577728000, 199766310912000, 1398364176384000

Offset

1,1

Comments

It is interesting that the first 0 occurs in the 14th place of e and the 32nd place in Pi.

Links

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

Example

a(2) = 14 because, e to two places being 2.7, we have 2 * 7 = 14.
a(3) = 14 because e to three places is 2.71.
a(4) = 112 because e to four places is 2.718 and 2 * 7 * 1 * 8 = 112.

Mathematica

Rest[FoldList[Times, 1, Select[RealDigits[E, 10, 30][[1]], #!=0&]]] (* Harvey P. Dale, Jan 23 2015 *)

Prog

(PARI) etorial(n) = { default(realprecision, 10000); p = exp(1)/10; default(realprecision, 28); for(j=1, n, eitor=1; e1=p; for(x=1, j, d = e1*10; d1=floor(d); if(d1<>0, eitor*=d1); e1 = frac(d); ); print1(eitor", ") ) }

Crossrefs

Cf. A074850.

Sequence in context: A174706 A307269 A072163 * A009774 A276553 A032933

Adjacent sequences: A084671 A084672 A084673 * A084675 A084676 A084677

Keyword

easy,nonn,base

Author

Cino Hilliard, Jun 29 2003

Extensions

Corrected and extended by Harvey P. Dale, Jan 23 2015

Status

approved