|
|
A087765
|
|
Primes whose reversal is a multiple of 17.
|
|
10
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
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[700]], Divisible[IntegerReverse[#], 17]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 25 2019 *)
|
|
PROG
|
(PARI) forprime(n=2, 6000, if(fromdigits(Vecrev(digits(n)))%17==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), this sequence (k=17), A087766 (k=19), A087767 (k=23).
Sequence in context: A174812 A146355 A175730 * A141971 A144974 A144975
Adjacent sequences: A087762 A087763 A087764 * A087766 A087767 A087768
|
|
KEYWORD
|
easy,nonn,base
|
|
AUTHOR
|
Zak Seidov, Oct 03 2003
|
|
EXTENSIONS
|
Corrected and extended by Ray Chandler, Oct 05 2003
Corrected and extended by Harvey P. Dale, Aug 25 2019
|
|
STATUS
|
approved
|
|
|
|