login
A044217
Numbers n such that string 3,6 occurs in the base 8 representation of n but not of n-1.
1
30, 94, 158, 222, 240, 286, 350, 414, 478, 542, 606, 670, 734, 752, 798, 862, 926, 990, 1054, 1118, 1182, 1246, 1264, 1310, 1374, 1438, 1502, 1566, 1630, 1694, 1758, 1776, 1822, 1886, 1920, 2014, 2078, 2142, 2206, 2270, 2288
OFFSET
1,1
LINKS
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {3, 6}]>0, 1, 0], {n, 2300}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Dec 25 2016 *)
CROSSREFS
Sequence in context: A042778 A031212 A165133 * A044598 A033573 A035076
KEYWORD
nonn,base
STATUS
approved