A357809 Locations of successive records in A357062.
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
Links
- Rémy Sigrist, C program
Crossrefs
Cf. A357062.
Programs
-
C
See Links section.
-
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
Extensions
More terms from Rémy Sigrist, Oct 21 2022