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

36, 136, 236, 336, 369, 436, 536, 636, 736, 836, 936, 1036, 1136, 1236, 1336, 1369, 1436, 1536, 1636, 1736, 1836, 1936, 2036, 2136, 2236, 2336, 2369, 2436, 2536, 2636, 2736, 2836, 2936, 3036, 3136, 3236, 3336, 3369, 3436

Offset

1,1

Links

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

Mathematica

Select[Range[3500], MemberQ[Partition[IntegerDigits[#], 2, 1], {3, 6}] && !MemberQ[Partition[IntegerDigits[#+1], 2, 1], {3, 6}]&] (* Harvey P. Dale, Sep 03 2012 *)
SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {3, 6}]>0, 1, 0], {n, 3500}], {1, 0}][[;; , 1]] (* Harvey P. Dale, Dec 06 2023 *)

Crossrefs

Sequence in context: A254284 A076578 A044368 * A067865 A272524 A303899

Adjacent sequences: A044746 A044747 A044748 * A044750 A044751 A044752

Keyword

nonn,base

Author

Clark Kimberling

Status

approved