A044688 Numbers n such that string 6,2 occurs in the base 9 representation of n but not of n+1.

56, 137, 218, 299, 380, 461, 512, 542, 623, 704, 785, 866, 947, 1028, 1109, 1190, 1241, 1271, 1352, 1433, 1514, 1595, 1676, 1757, 1838, 1919, 1970, 2000, 2081, 2162, 2243, 2324, 2405, 2486, 2567, 2648, 2699, 2729, 2810

Offset

1,1

Links

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

Mathematica

Select[Range[3000], MemberQ[Partition[IntegerDigits[#, 9], 2, 1], {6, 2}] && !MemberQ[Partition[IntegerDigits[#+1, 9], 2, 1], {6, 2}]&] (* Harvey P. Dale, Nov 02 2011 *)
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {6, 2}]>0, 1, 0], {n, 3000}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Nov 30 2020 *)

Crossrefs

Sequence in context: A121736 A107937 A044307 * A241287 A201096 A358540

Adjacent sequences: A044685 A044686 A044687 * A044689 A044690 A044691

Keyword

nonn,base

Author

Clark Kimberling

Status

approved