A177943 Locations of records in A177942.
1, 3, 4, 9, 11, 13, 20, 33, 42, 49, 84, 86, 107, 109, 123, 128, 191, 295, 296, 318, 330, 337, 396, 453, 481, 616, 663, 771, 882, 1105, 1180, 1257, 1431, 1659, 1856, 1936, 2130, 2370, 2584, 2651, 2790, 2959, 3009, 3080, 3121, 3189, 3503, 3639, 3879, 3902, 3961
Offset: 1
Keywords
Programs
-
PARI
listai(nn) = {my(va = vector(nn), rec = 0, ind = 1); va[1] = 5; for (n=2, nn, p = factor(va[n-1]^2-4)[1,1]; if (p > rec, print1(n-1, ", "); rec = p); va[n] = va[n-1] + p - 1;);} \\ Michel Marcus, Dec 14 2018
Extensions
1 inserted, a(10) corrected and sequence extended by R. J. Mathar, Jun 30 2010
More terms from Michel Marcus, Dec 14 2018
Comments