login
A044003
Numbers k such that 0 and 8 occur juxtaposed in the base-10 representation of k but not of k+1.
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
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
KEYWORD
nonn,base
STATUS
approved