login
A357809
Locations of successive records in A357062.
2
0, 4, 6, 12, 24, 36, 40, 54, 60, 84, 96, 120, 144, 168, 180, 264, 360, 420, 504, 600, 840, 1176, 1320, 1440, 1680, 2280, 2520, 3024, 3120, 3960, 6120, 6300, 7560, 7800, 8160, 11760, 14040, 19320, 21600, 27720, 30240, 38760, 52920, 55440, 65520, 83160, 85680
OFFSET
1,2
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
Cf. A357062.
Sequence in context: A303198 A120211 A308471 * A162688 A362883 A352634
KEYWORD
nonn,hard
AUTHOR
EXTENSIONS
More terms from Rémy Sigrist, Oct 21 2022
STATUS
approved