OFFSET
1,1
EXAMPLE
11 is in sequence A335410. 2*(11^2 - 7^2) = 144 = 12^2. Therefore, 12 is in this sequence.
MATHEMATICA
Select[IntegerQ][Table[Sqrt[2*Prime[n]^2 - 2*Prime[n-1]^2], {n, 17000}]]
PROG
(PARI) lista(nn) = {my(pp=2, s); forprime (p=3, nn, if (issquare(s=2*(p^2 - pp^2)), print1(sqrtint(s), ", ")); pp = p; ); } \\ Michel Marcus, Jun 25 2020
CROSSREFS
KEYWORD
nonn
AUTHOR
Jeff Brown, Jun 22 2020
STATUS
approved