A044418 Numbers n such that string 8,6 occurs in the base 10 representation of n but not of n-1.

86, 186, 286, 386, 486, 586, 686, 786, 860, 886, 986, 1086, 1186, 1286, 1386, 1486, 1586, 1686, 1786, 1860, 1886, 1986, 2086, 2186, 2286, 2386, 2486, 2586, 2686, 2786, 2860, 2886, 2986, 3086, 3186, 3286, 3386, 3486, 3586

Offset

1,1

Links

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

Mathematica

Select[Range[4000], MemberQ[Partition[IntegerDigits[#], 2, 1], {8, 6}]&& !MemberQ[Partition[IntegerDigits[#-1], 2, 1], {8, 6}]&] (* Harvey P. Dale, Oct 02 2011 *)
SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {8, 6}]>0, 1, 0], {n, 4000}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jan 04 2020 *)

Crossrefs

Sequence in context: A044637 A229359 A063353 * A044799 A202532 A202525

Adjacent sequences: A044415 A044416 A044417 * A044419 A044420 A044421

Keyword

nonn,base

Author

Clark Kimberling

Status

approved