A044002 Numbers k such that 0 and 7 occur juxtaposed in the base-10 representation of k but not of k+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

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

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

Adjacent sequences: A043999 A044000 A044001 * A044003 A044004 A044005

Keyword

nonn,base

Author

Clark Kimberling

Status

approved