OFFSET
1,3
COMMENTS
See A073101 for the 4/n conjecture due to Erdős and Straus.
MATHEMATICA
f[n_] := Length@ Solve[2/n == 1/x + 1/y + 1/z && 0 < x < y < z, {x, y, z}, Integers]; Array[f, 75]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jul 17 2013
STATUS
approved