login
A044397
Numbers n such that string 6,5 occurs in the base 10 representation of n but not of n-1.
0
65, 165, 265, 365, 465, 565, 650, 665, 765, 865, 965, 1065, 1165, 1265, 1365, 1465, 1565, 1650, 1665, 1765, 1865, 1965, 2065, 2165, 2265, 2365, 2465, 2565, 2650, 2665, 2765, 2865, 2965, 3065, 3165, 3265, 3365, 3465, 3565
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {6, 5}]>0, 1, 0], {n, 4000}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jul 05 2019 *)
CROSSREFS
Sequence in context: A044697 A350209 A326157 * A044778 A054902 A255244
KEYWORD
nonn,base
STATUS
approved