login
A044261
Numbers n such that string 1,1 occurs in the base 9 representation of n but not of n-1.
0
10, 90, 172, 253, 334, 415, 496, 577, 658, 739, 810, 901, 982, 1063, 1144, 1225, 1306, 1387, 1468, 1548, 1630, 1711, 1792, 1873, 1954, 2035, 2116, 2197, 2277, 2359, 2440, 2521, 2602, 2683, 2764, 2845, 2926, 3006, 3088
OFFSET
1,1
MATHEMATICA
Select[Range[3100], MemberQ[Partition[IntegerDigits[#, 9], 2, 1], {1, 1}] && !MemberQ[Partition[IntegerDigits[#-1, 9], 2, 1], {1, 1}]&] (* Harvey P. Dale, Mar 01 2012 *)
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {1, 1}]>0, 1, 0], {n, 3100}], {0, 1}][[All, 2]] (* Harvey P. Dale, Aug 03 2021 *)
CROSSREFS
Sequence in context: A057081 A024132 A192898 * A065690 A202919 A202576
KEYWORD
nonn,base
STATUS
approved