login
A087762
Primes whose reversal is a multiple of 7.
10
7, 19, 41, 53, 89, 103, 127, 139, 173, 197, 211, 223, 281, 293, 331, 367, 379, 463, 487, 499, 571, 691, 719, 827, 839, 911, 947, 1013, 1049, 1277, 1289, 1303, 1327, 1361, 1373, 1423, 1447, 1459, 1481, 1493, 1531, 1543, 1567, 1579, 1663, 1699, 1783, 1907
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[300]], Divisible[FromDigits[Reverse[IntegerDigits[ #]]], 7]&] (* Harvey P. Dale, Dec 05 2012 *)
PROG
(PARI) forprime(n=2, 2000, if(fromdigits(Vecrev(digits(n)))%7==0, print1(n, ", "))) \\ Mohammed Yaseen, Jul 19 2022
CROSSREFS
Primes whose reversal is a multiple of k: this sequence (k=7), A087764 (k=13), A087765 (k=17), A087766 (k=19), A087767 (k=23).
Sequence in context: A120720 A098422 A191066 * A195349 A160422 A213782
KEYWORD
easy,nonn,base
AUTHOR
Zak Seidov, Oct 03 2003
STATUS
approved