A144999 Denominators of an Egyptian fraction for 1/Sqrt[24] = 0.20412414523...
5, 243, 112122, 26152629083, 896398925366011889258, 3015244976414322457555463218875802090369767, 64507244652051292999487806064926450248354528876835935231409173161547519285211444127477
Offset: 1
Crossrefs
Programs
-
Mathematica
a = {}; k = N[1/Sqrt[24], 1000]; Do[s = Ceiling[1/k]; AppendTo[a, s]; k = k - 1/s, {n, 1, 10}]; a (*Artur Jasinski*)