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

%I #10 Feb 12 2021 22:00:50

%S 1,2,3,7,8,12,13,28,29,34,35,50,51,55,114,115,119,136,140,141,200,204,

%T 205,220,221,456,460,461,476,477,546,547,562,563,567,802,803,818,819,

%U 823,882,883,887,1826,1827,1842,1843,1847,1906

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

%t Select[Range[2000],Min[Abs[Differences[IntegerDigits[#,4]]]]>1&] (* _Harvey P. Dale_, Nov 25 2018 *)

%K nonn,base

%O 1,2

%A _Clark Kimberling_