%I #7 Oct 07 2013 17:12:28
%S 46,110,174,238,302,366,368,430,494,558,622,686,750,814,878,880,942,
%T 1006,1070,1134,1198,1262,1326,1390,1392,1454,1518,1582,1646,1710,
%U 1774,1838,1902,1904,1966,2030,2094,2158,2222,2286,2350
%N Numbers n such that string 5,6 occurs in the base 8 representation of n but not of n-1.
%t Select[Range[2400],MemberQ[Partition[IntegerDigits[#,8],2,1],{5,6}] && !MemberQ[Partition[IntegerDigits[#-1,8],2,1],{5,6}]&] (* _Harvey P. Dale_, Oct 07 2013 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_