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

80, 108, 180, 208, 280, 308, 380, 408, 480, 508, 580, 608, 680, 708, 780, 809, 880, 908, 980, 1008, 1089, 1108, 1180, 1208, 1280, 1308, 1380, 1408, 1480, 1508, 1580, 1608, 1680, 1708, 1780, 1809, 1880, 1908, 1980, 2008, 2089

Offset

1,1

Links

Michael De Vlieger, Table of n, a(n) for n = 1..10000

Mathematica

With[{j = 0, k = 8}, Position[Partition[Array[Boole[Total@ {SequenceCount[#, {j, k}], SequenceCount[#, {k, j}]} > 0] &@ IntegerDigits[#] &, 2100], 2, 1], {1, 0}][[All, 1]]] (* Michael De Vlieger, Aug 27 2021 *)

Crossrefs

Sequence in context: A223084 A043223 A039400 * A062376 A223087 A261549

Adjacent sequences: A044000 A044001 A044002 * A044004 A044005 A044006

Keyword

nonn,base

Author

Clark Kimberling

Status

approved