|
%I #14 Aug 25 2021 06:58:06
%S 29,34,65,70,101,106,137,142,179,209,214,245,250,281,286,317,322,353,
%T 358,395,425,430,461,466,497,502,533,538,569,574,611,641,646,677,682,
%U 713,718,749,754,785,790,827,857,862,893,898
%N Numbers k such that 4 and 5 occur juxtaposed in the base-6 representation of k but not of k+1.
%t Select[Range[1000],MemberQ[Sort/@Partition[IntegerDigits[#,6], 2,1], {4,5}]&& !MemberQ[Sort/@Partition[IntegerDigits[#+1,6],2,1], {4,5}]&] (* _Harvey P. Dale_, Apr 12 2011 *)
%Y Cf. A007092.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
