A050783 Palindromes containing no pair of consecutive equal digits.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 101, 121, 131, 141, 151, 161, 171, 181, 191, 202, 212, 232, 242, 252, 262, 272, 282, 292, 303, 313, 323, 343, 353, 363, 373, 383, 393, 404, 414, 424, 434, 454, 464, 474, 484, 494, 505, 515, 525, 535, 545, 565, 575, 585, 595, 606

Offset

1,3

Links

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

Mathematica

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

Crossrefs

Cf. A002113, A050784, A030147, A046075.

Sequence in context: A071272 A083851 A071275 * A030147 A207954 A193412

Adjacent sequences: A050780 A050781 A050782 * A050784 A050785 A050786

Keyword

nonn,base

Author

Patrick De Geest, Sep 15 1999

Status

approved