OFFSET
1,1
COMMENTS
n is a term if n^2 = 2*x*(y-x), where x and y are the averages of two consecutive twin prime pairs.
EXAMPLE
48^2 = 2*192*(198-192), and 192 and 198 are consecutive terms in A014574, so 48 is in the sequence.
PROG
(PARI) lista(nn) = {p=2; last = 0; forprime (q=3, nn, if (q-p==2, if (! last, last = p+1, new = p+1; val = new^2-last^2 - (new-last)^2; if (issquare(val), print1(sqrtint(val), ", ")); last = new; ); ); p=q; ); } \\ Michel Marcus, Feb 18 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Neri Gionata, Feb 18 2015
EXTENSIONS
More terms from Michel Marcus, Feb 18 2015
STATUS
approved