login
Numbers with the property that all pairs of consecutive base-6 digits differ by more than 1.
0

%I #10 Feb 12 2021 22:01:11

%S 1,2,3,4,5,9,10,11,12,16,17,18,19,23,24,25,26,30,31,32,33,54,55,59,60,

%T 61,62,66,67,68,69,74,75,76,77,96,97,98,102,103,104,105,110,111,112,

%U 113,117,118,119,138,139,140,141,146,147,148

%N Numbers with the property that all pairs of consecutive base-6 digits differ by more than 1.

%t Select[Range[200],Min[Abs[Differences[IntegerDigits[#,6]]]]>1&] (* _Harvey P. Dale_, May 29 2019 *)

%K nonn,base

%O 1,2

%A _Clark Kimberling_