OFFSET
1,2
LINKS
Rémy Sigrist, C program
PROG
(PARI) upto(n) = { w = vector(n); res = List([0]); r = 0; for(i = 1, sqrtnint(n, 3), for(j = i, sqrtint(n\i), for(k = j, n\(i*j), c = i*j*k + i + j + k; if(c <= n, w[c]+=[1, 3, 6][#Set([i, j, k])]; ) ) ) ); for(i = 1, #w, if(w[i] > r, r = w[i]; listput(res, i); ) ); res };
upto(20000) \\ David A. Corneth, Oct 13 2022
(C) See Links section.
CROSSREFS
KEYWORD
nonn,hard
AUTHOR
Charles R Greathouse IV, Oct 13 2022
EXTENSIONS
More terms from Rémy Sigrist, Oct 21 2022
STATUS
approved