%I #12 Aug 26 2021 03:22:09
%S 40,69,104,133,168,197,232,261,296,327,360,389,424,453,488,517,559,
%T 581,616,645,680,709,744,773,808,839,872,901,936,965,1000,1029,1071,
%U 1093,1128,1157,1192,1221,1256,1285,1320,1351,1384
%N Numbers k such that 0 and 5 occur juxtaposed in the base-8 representation of k but not of k+1.
%t n05Q[n_]:=MemberQ[Sort/@Partition[IntegerDigits[n,8],2,1], {0,5}]; Select[ Range[1500],n05Q[#]&&!n05Q[#+1]&] (* _Harvey P. Dale_, May 07 2011 *)
%Y Cf. A007094.
%K nonn,base
%O 1,1
%A _Clark Kimberling_