%I #8 Feb 15 2014 17:34:37
%S 5,17,37,79,97,101,127,181,227,229,241,283,311,359,389,397,421,457,
%T 521,547,577,631,769,787,811,821,859,967,1021,1039,1051,1109,1153,
%U 1327,1399,1429,1447,1523,1579,1597,1699,1721,1723,1787,1871,1997,1999,2081,2141
%N Primes such that the square of the sum of itself and next prime, when added to 5, is a prime
%C [p(i)+p(i+1)]^2+5 is a prime.
%H Harvey P. Dale, <a href="/A181423/b181423.txt">Table of n, a(n) for n = 1..1000</a>
%e a(5)=97 since (97+101)^2+5=198^2+5=39204+5=39209 is a prime.
%t Transpose[Select[Partition[Prime[Range[400]],2,1],PrimeQ[Total[#]^2+ 5]&]] [[1]] (* _Harvey P. Dale_, Feb 15 2014 *)
%Y Cf. A000045, A181421, A181422
%K nonn
%O 1,1
%A _Carmine Suriano_, Oct 18 2010
%E Values 521, 547, 577, 769,.. inserted by _R. J. Mathar_, Oct 18 2010