A087762 Primes whose reversal is a multiple of 7.

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

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: this sequence (k=7), A087764 (k=13), A087765 (k=17), A087766 (k=19), A087767 (k=23).

Programs

Mathematica

Select[Prime[Range[300]],Divisible[FromDigits[Reverse[IntegerDigits[ #]]], 7]&] (* Harvey P. Dale, Dec 05 2012 *)

PARI

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