|
|
A249944
|
|
Numerator of fraction equal to the finite continued fraction [2,7,1,8,2,...] (first n digits of e).
|
|
2
|
|
|
2, 15, 17, 151, 319, 2703, 3022, 26879, 56780, 481119, 1981256, 10387399, 95467847, 10387399, 137017443, 695474614, 1527966671, 5279374627, 27924839806, 89053894045, 562248204076, 89053894045, 740355992166, 6011901831373, 42823668811777, 177306577078481
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
2 + 1/7 = 15/7 defines a(2).
2 + 1/(7 + 1/1) = 17/8 defines a(3).
|
|
MATHEMATICA
|
Module[{nn=30, pd}, pd=RealDigits[E, 10, nn][[1]]; Table[Numerator[ FromContinuedFraction[Take[pd, n]]], {n, nn}]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
frac,nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|