A142725 Denominators of an Egyptian fraction for 1/Sqrt[17] = 0.242535625...

5, 24, 1151, 6727710, 97954001297811, 12083213443785578998604325741, 2111557350230332542969297514824119073134312726162508784857, 5126406954746155312559668571658555244727150562238830979161154018392336359308299948544053564102183773577991816755308

Offset: 1

Author

Artur Jasinski, Sep 28 2008

Keywords

• frac
• nonn

Crossrefs

A069139, A006487, A006526, A006525, A006524, A001466, A110820, A117116, A118323, A118324, A118325, A144835, A132480-A132574, A069261, A144984-A145003

Programs

Mathematica

a = {}; k = N[1/Sqrt[17], 1000]; Do[s = Ceiling[1/k]; AppendTo[a, s]; k = k - 1/s, {n, 1, 10}]; a (*Artur Jasinski*)