login
A087767
Primes whose reversal is a multiple of 23.
10
29, 193, 223, 317, 349, 863, 1163, 1289, 1319, 1451, 1483, 1607, 1801, 2579, 2609, 2741, 2803, 3041, 3167, 3229, 3361, 3517, 4363, 4457, 4519, 4651, 5077, 5107, 5333, 5591, 5653, 5779, 6047, 6079, 6367, 6911, 7211, 7243, 7369, 7883
OFFSET
1,1
LINKS
Mohammed Yaseen, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harvey P. Dale)
MATHEMATICA
Select[Prime[Range[1000]], Divisible[IntegerReverse[#], 23]&] (* Harvey P. Dale, Apr 22 2022 *)
PROG
(PARI) forprime(n=2, 8000, if(fromdigits(Vecrev(digits(n)))%23==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), A087766 (k=19), this sequence (k=23).
Sequence in context: A355623 A125339 A126497 * A142226 A323576 A142653
KEYWORD
easy,nonn,base
AUTHOR
Zak Seidov, Oct 03 2003
STATUS
approved