A177945 Record values in A177942.
3, 7, 13, 37, 79, 163, 349, 757, 1567, 3163, 6547, 13099, 26497, 52999, 106273, 212557, 426889, 855427, 1710853, 3421903, 6845869, 13691767, 27385087, 54771007, 109542907, 219096259, 438203677, 876417229, 1752875893, 3505814527, 7011656629, 14023322167, 28046754727, 56093637367
Offset: 1
Keywords
Programs
-
PARI
listar(nn) = {my(va = vector(nn), rec = 0); va[1] = 5; for (n=2, nn, p = factor(va[n-1]^2-4)[1,1]; if (p > rec, print1(p, ", "); rec = p); va[n] = va[n-1] + p - 1;);} \\ Michel Marcus, Dec 14 2018
Extensions
Sequence extended by R. J. Mathar, Jun 30 2010
More terms from Michel Marcus, Dec 14 2018
Comments