A044010 Numbers k such that 1 and 7 occur juxtaposed in the base-10 representation of k but not of k+1.

17, 71, 117, 179, 217, 271, 317, 371, 417, 471, 517, 571, 617, 671, 719, 771, 817, 871, 917, 971, 1017, 1071, 1117, 1179, 1217, 1271, 1317, 1371, 1417, 1471, 1517, 1571, 1617, 1671, 1799, 1817, 1871, 1917, 1971, 2017, 2071

Offset

1,1

Links

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

Mathematica

SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {1, 7}]>0 || SequenceCount[ IntegerDigits[n], {7, 1}]>0, 1, 0], {n, 2100}], {1, 0}][[All, 1]] (* Harvey P. Dale, Apr 11 2022 *)

Crossrefs

Sequence in context: A152295 A039407 A043230 * A106921 A105414 A157910

Adjacent sequences: A044007 A044008 A044009 * A044011 A044012 A044013

Keyword

nonn,base

Author

Clark Kimberling

Status

approved