login
A177945
Record values in A177942.
2
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,1
COMMENTS
From the construction of A177941, this is a subsequence of A023200.
PROG
(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
KEYWORD
nonn
AUTHOR
Vladimir Shevelev, May 15 2010
EXTENSIONS
Sequence extended by R. J. Mathar, Jun 30 2010
More terms from Michel Marcus, Dec 14 2018
STATUS
approved