A087765 Primes whose reversal is a multiple of 17.

43, 71, 109, 137, 193, 631, 911, 997, 1049, 1291, 1543, 1571, 1609, 1637, 1693, 1759, 1787, 1823, 1973, 2053, 2081, 2269, 2297, 2333, 2549, 2699, 2707, 2791, 2857, 3001, 3217, 3581, 3769, 3797, 3833, 4007, 4091, 4129, 4157, 4409, 4493, 4651, 4903, 4931, 5011

Offset: 1

Author

Zak Seidov, Oct 03 2003

Keywords

• easy
• nonn
• base

Links

• Mohammed Yaseen, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harvey P. Dale)

Crossrefs

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

Programs

Mathematica

Select[Prime[Range[700]],Divisible[IntegerReverse[#],17]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 25 2019 *)

PARI

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

Extensions

Corrected and extended by Ray Chandler, Oct 05 2003

Corrected and extended by Harvey P. Dale, Aug 25 2019