The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #7 Jun 08 2018 13:11:35
%S 48,112,176,240,304,368,391,432,496,560,624,688,752,816,880,903,944,
%T 1008,1072,1136,1200,1264,1328,1392,1415,1456,1520,1584,1648,1712,
%U 1776,1840,1904,1927,1968,2032,2096,2160,2224,2288,2352
%N Numbers n such that string 6,0 occurs in the base 8 representation of n but not of n+1.
%t 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 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_