A050785 Palindromes containing at least one pair of consecutive equal digits.

11, 22, 33, 44, 55, 66, 77, 88, 99, 111, 222, 333, 444, 555, 666, 777, 888, 999, 1001, 1111, 1221, 1331, 1441, 1551, 1661, 1771, 1881, 1991, 2002, 2112, 2222, 2332, 2442, 2552, 2662, 2772, 2882, 2992, 3003, 3113, 3223, 3333, 3443, 3553, 3663, 3773, 3883

Offset

1,1

Links

Table of n, a(n) for n=1..47.

Mathematica

Select[Range[3900], Reverse[x=IntegerDigits[#]]==x&&MemberQ[Differences[x], 0]&] (* Jayanta Basu, Jun 01 2013 *)

Crossrefs

Cf. A002113, A050786, A050783.

Sequence in context: A244394 A299792 A115853 * A369347 A239019 A033023

Adjacent sequences: A050782 A050783 A050784 * A050786 A050787 A050788

Keyword

nonn,easy,base

Author

Patrick De Geest, Sep 15 1999

Status

approved