A246068 Indices of records in A246066.
0, 2, 6, 14, 20, 24, 30, 42, 62, 78, 110, 120, 126, 156, 240, 254, 272, 336, 342, 510, 620, 726, 812, 930, 1022, 1320, 1332, 1640, 1806, 2046, 2184, 2394, 2756, 3120, 3422, 3660, 4094, 4422, 4896, 4970, 5256, 6162, 6558, 6840, 7832, 8190, 9312, 10100, 10506
Offset: 1
Keywords
Links
- Jens Kruse Andersen, Table of n, a(n) for n = 1..10000
Programs
-
PARI
k=2; for(n=0, 10506, k=k-1; r=k+1; until(vecmax(vector(#f[, 1], i, f[i, 1]^f[i, 2]))>vecmax(f[, 1])+n, k++; f=factor(k)); if(k>r, print1(n, ", ")));
Comments