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

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

%S 2,23,29,41,43,47,83,89,223,239,241,257,269,271,281,293,401,443,449,

%T 461,463,467,479,811,821,823,829,839,853,859,877,881,883,887,2003,

%U 2027,2039,2053,2081,2089,2113,2129,2131,2137,2161,2179,2221,2237,2251,2269,2281

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

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

%e 83 is in the sequence because 38+9=47 is prime.

%t Select[Prime[Range[4000]], PrimeQ[FromDigits[Reverse[IntegerDigits[#]]] + 9]&]

%o (Magma) [p: p in PrimesUpTo(4000) | IsPrime(q+9) 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