A098892 Numbers which yield a repdigit when added to their reversal.

1, 2, 3, 4, 10, 11, 12, 13, 14, 15, 16, 17, 18, 20, 21, 22, 23, 24, 25, 26, 27, 30, 31, 32, 33, 34, 35, 36, 40, 41, 42, 43, 44, 45, 50, 51, 52, 53, 54, 60, 61, 62, 63, 70, 71, 72, 80, 81, 90, 111, 123, 135, 147, 209, 210, 222, 234, 246, 308, 321, 333, 345, 407, 420, 432, 444

Offset

1,2

Comments

a(n) + A004086(a(n)) = A010785(k) for an appropriate k.

Links

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

Eric Weisstein's World of Mathematics, Repdigit

Example

209 + A004086(209) = 209 + 902 = 1111 = A010785(28),
therefore 209 is a term: a(54)=209.

Mathematica

Select[Range[500], Count[DigitCount[# + IntegerReverse[#]], 0]==9&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Mar 20 2020 *)

Crossrefs

Sequence in context: A119798 A015976 A370842 * A174139 A037325 A293292

Adjacent sequences: A098889 A098890 A098891 * A098893 A098894 A098895

Keyword

nonn,base

Author

Reinhard Zumkeller, Nov 04 2004

Status

approved