login
A044616
Numbers n such that string 6,0 occurs in the base 8 representation of n but not of n+1.
0
48, 112, 176, 240, 304, 368, 391, 432, 496, 560, 624, 688, 752, 816, 880, 903, 944, 1008, 1072, 1136, 1200, 1264, 1328, 1392, 1415, 1456, 1520, 1584, 1648, 1712, 1776, 1840, 1904, 1927, 1968, 2032, 2096, 2160, 2224, 2288, 2352
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {6, 0}]>0, 1, 0], {n, 2500}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 08 2018 *)
CROSSREFS
Sequence in context: A187931 A191837 A044235 * A182679 A260759 A211726
KEYWORD
nonn,base
STATUS
approved