A062904 Numbers n such that n and its reversal are both multiples of 14.

252, 434, 616, 686, 868, 2002, 2072, 2254, 2436, 2520, 2590, 2618, 2688, 2702, 2772, 2954, 4004, 4074, 4256, 4340, 4438, 4522, 4592, 4704, 4774, 4956, 6006, 6076, 6160, 6258, 6342, 6524, 6594, 6706, 6776, 6860, 6958, 8008, 8078, 8162, 8344, 8526, 8596

Offset: 1

Author

Amarnath Murthy, Jul 01 2001

Keywords

• nonn
• base
• easy

Examples

			2254 and 4522 are both multiples of 14.
		

Links

• Robert Israel, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A062903, A062905, A062906, A062907.

Programs

Maple

filter:= proc(n) local L,j;
  L:= convert(n,base,10);
  add(10^(j-1)*L[-j],j=1..nops(L)) mod 14 = 0
end proc:
select(filter, [seq(seq(seq(a*10^d+x,x=((-a*10^d) mod 14)..10^d-2,14),a=2..8,2),d=1..4)]); # Robert Israel, May 11 2018

Mathematica

Select[14*Range[700],Divisible[FromDigits[Reverse[IntegerDigits[ #]]],14]&] (* Harvey P. Dale, Jul 25 2012 *)

PARI

isok(n) = !(n % 14) && !(fromdigits(Vecrev(digits(n))) % 14); \\ Michel Marcus, May 12 2018

Extensions

More terms from Erich Friedman, Jul 02 2001