Annual appeal: Please make a donation to keep the OEIS running! Over 6000 articles have referenced us, often saying "we discovered this result with the help of the OEIS". Other ways to donate

1,1

Table of n, a(n) for n=1..39.

a[n_] := Length@ Solve[1/n == 1/w + 1/x + 1/y + 1/z && 0 < w <= x <= y <= z, {w, x, y, z}, Integers]; (* Robert G. Wilson v, Apr 30 2014 *)

Sequence in context: A099300 A038735 A181378 * A039629 A205493 A074886

Adjacent sequences: A020324 A020325 A020326 * A020328 A020329 A020330

nonn

David W. Wilson

approved