%I
%S 48,70,112,134,176,198,240,262,304,326,368,391,432,454,496,518,567,
%T 582,624,646,688,710,752,774,816,838,880,903,944,966,1008,1030,1079,
%U 1094,1136,1158,1200,1222,1264,1286,1328,1350,1392
%N Numbers n such that 0 and 6 occur juxtaposed in the base 8 representation of n but not of n+1.
%t Select[Range[1500],MemberQ[Sort/@Partition[IntegerDigits[#,8],2,1],{0,6}]&&!MemberQ[Sort/@Partition[IntegerDigits[#+1,8],2,1],{0,6}]&] (* _Harvey P. Dale_, Aug 25 2012 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
