A249944 Numerator of fraction equal to the finite continued fraction [2,7,1,8,2,...] (first n digits of e).
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
Offset: 1
Examples
2 + 1/7 = 15/7 defines a(2). 2 + 1/(7 + 1/1) = 17/8 defines a(3).
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Module[{nn=30,pd},pd=RealDigits[E,10,nn][[1]];Table[Numerator[ FromContinuedFraction[Take[pd,n]]],{n,nn}]]