A044779 Numbers n such that string 6,6 occurs in the base 10 representation of n but not of n+1.

66, 166, 266, 366, 466, 566, 669, 766, 866, 966, 1066, 1166, 1266, 1366, 1466, 1566, 1669, 1766, 1866, 1966, 2066, 2166, 2266, 2366, 2466, 2566, 2669, 2766, 2866, 2966, 3066, 3166, 3266, 3366, 3466, 3566, 3669, 3766, 3866

Offset

1,1

Links

Table of n, a(n) for n=1..39.

Mathematica

SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {6, 6}]>0, 1, 0], {n, 4000}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Mar 28 2020 *)

Crossrefs

Sequence in context: A062035 A043514 A044398 * A249284 A255102 A202647

Adjacent sequences: A044776 A044777 A044778 * A044780 A044781 A044782

Keyword

nonn,base

Author

Clark Kimberling

Status

approved