OFFSET
2,3
COMMENTS
LINKS
Michael De Vlieger, Table of n, a(n) for n = 2..10000
FORMULA
a(n) = A094340(n) for all n > 1. - David Wasserman, Jan 06 2009
MATHEMATICA
nn = 71; c[_] := False;
Array[Set[{a[#], c[#]}, {#, True}] &, 2]; s = a[1] + a[2];
Reap[Do[k = SelectFirst[Divisors[s], ! c[#] &];
c[k] = True; Sow[s/k];
s += k, {n, 3, nn}] ][[-1, 1]] (* Michael De Vlieger, Apr 26 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Oct 30 2005
STATUS
approved