login
Numbers k such that 1 and 3 occur juxtaposed in the base-6 representation of k but not of k-1.
0

%I #11 Aug 22 2021 17:56:51

%S 9,19,45,54,81,91,114,127,153,163,189,199,225,235,261,270,297,307,324,

%T 369,379,405,415,441,451,477,486,513,523,546,559,585,595,621,631,657,

%U 667,684,729,739,762,775,801,811,837,847,873

%N Numbers k such that 1 and 3 occur juxtaposed in the base-6 representation of k but not of k-1.

%t Select[Range[900],MemberQ[Sort/@Partition[IntegerDigits[#,6],2,1],{1,3}] && !MemberQ[Sort/@Partition[IntegerDigits[#-1,6],2,1],{1,3}]&] (* _Harvey P. Dale_, Sep 20 2011 *)

%Y Cf. A007092.

%K nonn,base

%O 1,1

%A _Clark Kimberling_