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

58, 85, 158, 185, 258, 285, 358, 385, 458, 485, 558, 589, 658, 685, 758, 785, 859, 885, 958, 985, 1058, 1085, 1158, 1185, 1258, 1285, 1358, 1385, 1458, 1485, 1558, 1589, 1658, 1685, 1758, 1785, 1859, 1885, 1958, 1985, 2058

Offset

1,1

Links

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

Mathematica

SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {5, 8}]>0 || SequenceCount[ IntegerDigits[n], {8, 5}]>0, 1, 0], {n, 2200}], {1, 0}][[All, 1]] (* Harvey P. Dale, Jan 17 2023 *)

Crossrefs

Sequence in context: A306115 A039430 A043253 * A266451 A124680 A354448

Adjacent sequences: A044030 A044031 A044032 * A044034 A044035 A044036

Keyword

nonn,base

Author

Clark Kimberling

Status

approved