A357809 - OEIS

%I #12 Oct 21 2022 11:39:03

%S 0,4,6,12,24,36,40,54,60,84,96,120,144,168,180,264,360,420,504,600,

%T 840,1176,1320,1440,1680,2280,2520,3024,3120,3960,6120,6300,7560,7800,

%U 8160,11760,14040,19320,21600,27720,30240,38760,52920,55440,65520,83160,85680

%N Locations of successive records in A357062.

%H Rémy Sigrist, <a href="/A357809/a357809.txt">C program</a>

%o (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 };

%o upto(20000) \\ _David A. Corneth_, Oct 13 2022

%o (C) See Links section.

%Y Cf. A357062.

%K nonn,hard

%O 1,2

%A _Charles R Greathouse IV_, Oct 13 2022

%E More terms from _Rémy Sigrist_, Oct 21 2022