A195604 Numerator of floor(e*10^n)/10^n, where e = exp(1) = A001113.

2, 27, 271, 1359, 13591, 67957, 2718281, 13591409, 135914091, 679570457, 6795704571, 54365636569, 2718281828459, 2718281828459, 16989261427869, 543656365691809, 6795704571147613, 271828182845904523, 543656365691809047, 27182818284590452353

Offset

0,1

Comments

Numerator of the decimal fraction of e = 2.71828... truncated to a given number of decimal places.

Links

Table of n, a(n) for n=0..19.

Example

a(2) = 271 is the numerator of 2.71 = 271/100.
a(3) = 1359 is the numerator of 2.718 = 2718/1000 = 1359/500.

Mathematica

Module[{nn=30, ee}, ee=RealDigits[E, 10, nn][[1]]; Join[{2}, Rest[ Numerator[ Table[ FromDigits[Take[ee, n]]/10^n, {n, nn}]]]]] (* Harvey P. Dale, May 15 2015 *)

Prog

(PARI) a(n, c=exp(1))=numerator(c\.1^n/10^n)  \\ M. F. Hasler, Sep 21 2011

Crossrefs

Sequence in context: A175529 A267547 A302174 * A011543 A221186 A220530

Adjacent sequences: A195601 A195602 A195603 * A195605 A195606 A195607

Keyword

nonn,base

Author

M. F. Hasler, following a suggestion by Eric Angelini, Sep 21 2011

Status

approved