A144995 Denominators of an Egyptian fraction for 1/sqrt(19) = 0.22941573387...
5, 34, 251943, 77358462192, 329674933038929584801859, 118413558884112868600621270078763367701114576955, 19756890296133318743365962162537257145612343071078668201479848363416263252859088735079245625303
Offset: 1
Crossrefs
Programs
-
Mathematica
a = {}; k = N[1/Sqrt[19], 1000]; Do[s = Ceiling[1/k]; AppendTo[a, s]; k = k - 1/s, {n, 1, 10}]; a (* Artur Jasinski *)