OFFSET
1,1
COMMENTS
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
FORMULA
c(x) is O( sqrt(x/log x) / log x ), where c(x) is the counting function, the number of terms less than x.
EXAMPLE
3 and 5 are consecutive primes and 3^2 + (5-3)^2 = 9 + 4 = 13 is prime, so 13 is in the sequence.
MATHEMATICA
Select[Table[Prime[n]^2 + (Prime[n + 1] - Prime[n])^2, {n, 200}], PrimeQ] (* Alonso del Arte, Jul 29 2013 *)
PROG
(PARI) p=2; forprime(q=3, 1e4, if(isprime(t=p^2+(q-p)^2), print1(t", ")); p=q) \\ Charles R Greathouse IV, Jul 24 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Thomas Ordowski, Jul 24 2013
EXTENSIONS
a(5), a(9)-a(36) from Charles R Greathouse IV, Jul 24 2013
STATUS
approved