A131058 List of numbers n whose reverse, R(n), is not less than n.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 12, 13, 14, 15, 16, 17, 18, 19, 22, 23, 24, 25, 26, 27, 28, 29, 33, 34, 35, 36, 37, 38, 39, 44, 45, 46, 47, 48, 49, 55, 56, 57, 58, 59, 66, 67, 68, 69, 77, 78, 79, 88, 89, 99, 101, 102, 103, 104, 105, 106, 107, 108, 109, 111, 112, 113, 114, 115

Offset

1,3

Comments

First terms not in A009993 are 11, 22, 33, etc.

Links

David A. Corneth, Table of n, a(n) for n = 1..10000

Mathematica

Select[Range[0, 200], FromDigits[Reverse[IntegerDigits[ # ]]]>=#&]

Prog

(PARI) is(n) = my(d=digits(n)); sum(i=1, #d, 10^(#d-i)*d[i]) <= sum(i=1, #d, 10^(i-1)*d[i]) \\ David A. Corneth, Apr 25 2016
(PARI) isok(n) = subst(Polrev(digits(n)), x, 10) >= n; \\ Michel Marcus, Apr 25 2016

Crossrefs

Cf. A002113, A009993.

Sequence in context: A254621 A227510 A032898 * A032857 A072544 A009994

Adjacent sequences: A131055 A131056 A131057 * A131059 A131060 A131061

Keyword

nonn,base

Author

Zak Seidov, Sep 24 2007

Status

approved