login
Primes p such that (p reversed) + 5 is also a prime.
1

%I #10 Sep 08 2022 08:46:06

%S 2,23,29,41,47,83,89,227,233,239,251,257,263,269,293,401,419,431,443,

%T 467,491,641,647,827,863,881,2027,2063,2099,2111,2153,2207,2273,2297,

%U 2339,2357,2441,2459,2543,2609,2687,2693,2699,2729,2801,2819,2879,2927,2939,2963

%N Primes p such that (p reversed) + 5 is also a prime.

%H Vincenzo Librandi, <a href="/A235148/b235148.txt">Table of n, a(n) for n = 1..1000</a>

%e 47 is in the sequence because 74+5=79 is prime.

%t Select[Prime[Range[6000]], PrimeQ[FromDigits[Reverse[IntegerDigits[#]]] + 5]&]

%o (Magma) [p: p in PrimesUpTo(6000) | IsPrime(q + 5) where q is Seqint(Reverse(Intseq(p)))];

%Y Cf. A165446, A166501, A167460, A167466, A167473.

%K nonn,base

%O 1,1

%A _Vincenzo Librandi_, Jan 04 2014