A080230 Engel expansion for (positive) constant defined in A078756.

2, 4, 30, 63, 162, 629, 3918, 5345, 8577, 10902, 12073, 19001, 28961, 33387, 65964, 345951, 1876681, 2212505, 9373113, 11011867, 12921837, 14245984, 63809171, 96843656, 111393114, 340427213, 536556183, 768096412, 1510946116, 3988447796

Offset: 1

Author

Jon Perry, Feb 08 2003

Keywords

• nonn

Crossrefs

Cf. A006784, A078756, A080321.

Programs

PARI

{ my(x=vector(31), a=vector(#x-1)); x[1]=0.62923321313860758778445822033246963679442280615921;
for (i=1,#a,a[i]=ceil(1/x[i]); x[i+1]=x[i]*a[i]-1); a }

Formula

See A006784 for definition of Engel expansion.