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,1

Links

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

Formula

See A006784 for definition of Engel expansion

Prog

(PARI) x=vector(31); a=vector(30); x[1]=0.62923321313860758778445822033246963679442280615921 for (i=1, 30, a[i]=ceil(1/x[i]); x[i+1]=x[i]*a[i]-1); x

Crossrefs

Cf. A006784, A078756, A080321.

Sequence in context: A290169 A232173 A067195 * A084914 A058779 A359914

Adjacent sequences: A080227 A080228 A080229 * A080231 A080232 A080233

Keyword

nonn

Author

Jon Perry, Feb 08 2003

Status

approved