A166389 Multiples of 7 whose reversal + 1 is also a multiple of 7.

14, 84, 140, 147, 231, 238, 322, 329, 392, 399, 413, 483, 504, 574, 665, 756, 840, 847, 931, 938, 1043, 1134, 1225, 1295, 1316, 1386, 1400, 1407, 1470, 1477, 1561, 1568, 1652, 1659, 1743, 1834, 1925, 1995, 2044, 2135, 2226, 2296, 2310, 2317, 2380, 2387

Offset

1,1

Links

G. C. Greubel, Table of n, a(n) for n = 1..10000

Mathematica

Select[7 Range[6!], Divisible[FromDigits[Reverse[IntegerDigits[#]]] + 1, 7] &] (* G. C. Greubel, May 12 2016 *)

Prog

(PARI) isok(n) = !(n%7) && !((subst(Polrev(digits(n)), x, 10)+1) % 7); \\ Michel Marcus, May 12 2016

Crossrefs

Subsequence of A008589.

Sequence in context: A166819 A108683 A323415 * A085036 A107935 A008451

Adjacent sequences: A166386 A166387 A166388 * A166390 A166391 A166392

Keyword

nonn,base

Author

Claudio Meller, Oct 13 2009

Status

approved