login
Numbers n such that string 5,6 occurs in the base 8 representation of n but not of n+1.
0

%I #8 Nov 21 2013 12:47:03

%S 46,110,174,238,302,366,375,430,494,558,622,686,750,814,878,887,942,

%T 1006,1070,1134,1198,1262,1326,1390,1399,1454,1518,1582,1646,1710,

%U 1774,1838,1902,1911,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[2500],MemberQ[Partition[IntegerDigits[#,8],2,1],{5,6}] && !MemberQ[Partition[IntegerDigits[#+1,8],2,1],{5,6}]&] (* _Harvey P. Dale_, Oct 21 2011 *)

%K nonn,base

%O 1,1

%A _Clark Kimberling_