A238664 - OEIS

%I #6 Jul 07 2019 19:13:28

%S 7,31,37,43,79,97,103,241,271,307,367,373,421,499,547,571,601,607,709,

%T 751,883,907,967,1033,1129,1213,1231,1237,1327,1423,1597,1609,1621,

%U 1747,1801,1867,1933,1951,1993,2017,2131,2137,2203,2221,2281,2287,2647,2659

%N Primes p such that (p+2)^2+2 is prime but (p+1)^2+1 is not prime.

%H Alois P. Heinz, <a href="/A238664/b238664.txt">Table of n, a(n) for n = 1..10000</a>

%t Select[Prime[Range[400]],PrimeQ[(#+2)^2+2]&&CompositeQ[(#+1)^2+1]&] (* _Harvey P. Dale_, Jul 07 2019 *)

%Y Column k=2 of A238086.

%K nonn

%O 1,1

%A _Alois P. Heinz_, Mar 02 2014