OFFSET
1,2
LINKS
Oren Meisner, Table of n, a(n) for n = 1..10000
EXAMPLE
1495 and 5941 are both multiples of 13.
MATHEMATICA
Select[13*Range[0, 700], Divisible[FromDigits[Reverse[IntegerDigits[ #]]], 13]&] (* Harvey P. Dale, Nov 30 2014 *)
PROG
(PARI) isok(n) = !(n % 13) && !(fromdigits(Vecrev(digits(n))) % 13); \\ Michel Marcus, Aug 14 2018
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Amarnath Murthy, Jul 01 2001
EXTENSIONS
Corrected and extended by Dean Hickerson, Jul 06 2001
Zero added by Zak Seidov, May 31 2010
STATUS
approved