login
A087766
Primes whose reversal is a multiple of 19.
10
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,1
LINKS
MATHEMATICA
Select[Prime[Range[800]], Divisible[FromDigits[Reverse [IntegerDigits[#]]], 19]&] (* Harvey P. Dale, Mar 17 2011 *)
PROG
(PARI) forprime(n=2, 7000, if(fromdigits(Vecrev(digits(n)))%19==0, print1(n, ", "))) \\ Mohammed Yaseen, Jul 20 2022
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).
Sequence in context: A033237 A139894 A048988 * A096339 A216872 A235225
KEYWORD
easy,nonn,base
AUTHOR
Zak Seidov, Oct 03 2003
STATUS
approved