A043231 Numbers k such that 1 and 8 occur juxtaposed in the base-10 representation of k but not of k-1.

18, 81, 118, 180, 218, 281, 318, 381, 418, 481, 518, 581, 618, 681, 718, 781, 810, 881, 918, 981, 1018, 1081, 1118, 1180, 1218, 1281, 1318, 1381, 1418, 1481, 1518, 1581, 1618, 1681, 1718, 1781, 1800, 1918, 1981, 2018, 2081

Offset

1,1

Links

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

Mathematica

SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {1, 8}]>0||SequenceCount[IntegerDigits[n], {8, 1}]>0, 1, 0], {n, 2500}], {0, 1}][[;; , 2]] (* Harvey P. Dale, Dec 11 2024 *)

Crossrefs

Sequence in context: A063495 A264850 A039408 * A044011 A338039 A085504

Adjacent sequences: A043228 A043229 A043230 * A043232 A043233 A043234

Keyword

nonn,base,changed

Author

Clark Kimberling

Status

approved