A062912 Non-palindromic number and its reversal are both multiples of 13.

1495, 1586, 1677, 1768, 1859, 2496, 2587, 2678, 2769, 3497, 3588, 3679, 4498, 4589, 4940, 5499, 5850, 5941, 6760, 6851, 6942, 7670, 7761, 7852, 7943, 8580, 8671, 8762, 8853, 8944, 9490, 9581, 9672, 9763, 9854, 9945, 10010, 10595, 10686, 10777, 10868

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Example

1495 and 5941 are both multiples of 13.

Mathematica

Select[Range[11000], !PalindromeQ[#]&&And@@Divisible[{#, IntegerReverse[ #]}, 13]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Apr 25 2020 *)

Prog

(ARIBAS): n := 13; stop := 11000; m := 0; while m < stop do rev := int_reverse(m); if m <> rev and rev mod n = 0 then write(m, " "); end; inc(m, n); end;

Crossrefs

Sequence in context: A171617 A067841 A237968 * A328975 A345527 A345781

Adjacent sequences: A062909 A062910 A062911 * A062913 A062914 A062915

Keyword

nonn,base,easy

Author

Amarnath Murthy, Jul 01 2001

Extensions

Corrected and extended by Dean Hickerson, Jul 06, 2001

Status

approved