A087766 Primes whose reversal is a multiple of 19.

59, 67, 83, 139, 163, 227, 251, 307, 331, 977, 1019, 1051, 1123, 1697, 1777, 1873, 2003, 2011, 2593, 2657, 2729, 2753, 2833, 3449, 3457, 3529, 3617, 4177, 4273, 4337, 4409, 4441, 4513, 4999, 5081, 5153, 5209, 5233, 5879, 6113, 6121

Offset: 1

Author

Zak Seidov, Oct 03 2003

Keywords

• easy
• nonn
• base

Links

• Mohammed Yaseen, Table of n, a(n) for n = 1..10000

Crossrefs

Primes whose reversal is a multiple of k: A045711 (k=5), A087762 (k=7), A087764 (k=13), A087765 (k=17), this sequence (k=19), A087767 (k=23).

Programs

Mathematica

Select[Prime[Range[800]],Divisible[FromDigits[Reverse [IntegerDigits[#]]],19]&]  (* Harvey P. Dale, Mar 17 2011 *)

PARI

forprime(n=2, 7000, if(fromdigits(Vecrev(digits(n)))%19==0, print1(n, ", "))) \\ Mohammed Yaseen, Jul 20 2022