login
A044002
Numbers k such that 0 and 7 occur juxtaposed in the base-10 representation of k but not of k+1.
1
70, 107, 170, 207, 270, 307, 370, 407, 470, 507, 570, 607, 670, 709, 770, 807, 870, 907, 970, 1007, 1079, 1107, 1170, 1207, 1270, 1307, 1370, 1407, 1470, 1507, 1570, 1607, 1670, 1709, 1770, 1807, 1870, 1907, 1970, 2007, 2079
OFFSET
1,1
LINKS
MATHEMATICA
With[{j = 0, k = 7}, 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: A075004 A043222 A039399 * A117350 A004239 A357670
KEYWORD
nonn,base
STATUS
approved