A087764 Primes whose reversal is a multiple of 13.
19, 31, 269, 281, 397, 401, 457, 463, 523, 773, 827, 1063, 1117, 1123, 1367, 1373, 1427, 1433, 1489, 1549, 1609, 1621, 1871, 1931, 1987, 1993, 2027, 2089, 2161, 2221, 2399, 2459, 2531, 2593, 2647, 2707, 2713
Offset: 1
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Maple
digrev:= proc(n) local L, i; L:= convert(n,base,10); add(L[-i]*10^(i-1), i=1..nops(L)) end proc: B:= map(digrev, {seq(i,i=13..10000,13)}): sort(convert(select(isprime, B),list)); # Robert Israel, Oct 23 2019
-
PARI
forprime(n=2, 3000, if(fromdigits(Vecrev(digits(n)))%13==0, print1(n, ", "))) \\ Mohammed Yaseen, Jul 19 2022
Comments