login
Primes of form (prime(n)^2 + prime(n+1)^2)/2.
7

%I #38 Nov 22 2021 11:57:02

%S 17,37,229,2029,14449,22501,25609,28909,32401,42061,57601,72901,

%T 116989,176401,181501,265261,304729,324901,378229,462409,497041,

%U 695581,804709,1089961,1299721,1416109,1664101,1742401,1932181,1971241,2712709,2873029,3062509,3186229

%N Primes of form (prime(n)^2 + prime(n+1)^2)/2.

%C Except for the first term, all terms == 1 mod 6. - _Zak Seidov_, Dec 02 2009

%C Except 17, all terms == 1 mod 12. Primes of the form A028334(n+1)^2 + A024675(n)^2. - _Thomas Ordowski_, Jun 28 2013

%H Zak Seidov, <a href="/A093343/b093343.txt">Table of n, a(n) for n=1..1000</a>

%F Conjecture: a(n) ~ A224888(n). - _Thomas Ordowski_, Jul 25 2013

%t Select[Mean/@Partition[Prime[Range[500]]^2,2,1],PrimeQ] (* _Harvey P. Dale_, Jun 16 2021 *)

%Y Cf. A103739.

%K nonn

%O 1,1

%A _Giovanni Teofilatto_, Apr 26 2004

%E Corrected and extended by _Rick L. Shepherd_, Nov 24 2004