A359555 - OEIS

%I #48 Feb 27 2023 14:56:47

%S 2,3,5,11,17,23,41,47,59,83,101,107,113,149,173,227,239,251,257,311,

%T 347,353,389,419,431,443,449,479,503,557,563,653,677,683,701,809,821,

%U 839,887,911,971,983,1013,1181,1217,1223,1373,1427,1439,1499,1511,1601

%N Primes p such that (p-2)^2 + 2 is also prime.

%e 11 is a term since (11-2)^2 + 2 = 83, 83 is prime, and so is 11.

%t Select[Prime[Range[500]],PrimeQ[(#-2)^2+2] &]

%o (PARI) isok(p)={isprime(p) && isprime((p-2)^2 + 2)} \\ _Andrew Howroyd_, Feb 14 2023

%K nonn

%O 1,1

%A _Rhys Feltman_, Feb 11 2023