login
A044216
Numbers n such that string 3,5 occurs in the base 8 representation of n but not of n-1.
0
29, 93, 157, 221, 232, 285, 349, 413, 477, 541, 605, 669, 733, 744, 797, 861, 925, 989, 1053, 1117, 1181, 1245, 1256, 1309, 1373, 1437, 1501, 1565, 1629, 1693, 1757, 1768, 1821, 1856, 1949, 2013, 2077, 2141, 2205, 2269, 2280
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {3, 5}]>0, 1, 0], {n, 2300}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Oct 31 2017 *)
CROSSREFS
Sequence in context: A043239 A044019 A046437 * A044597 A138625 A381196
KEYWORD
nonn,base
STATUS
approved