A032970 - OEIS

%I #10 May 04 2021 12:34:11

%S 1,2,3,4,5,6,10,11,12,13,14,18,19,20,21,22,26,27,28,29,30,34,35,36,37,

%T 38,42,43,44,45,46,70,71,75,76,77,78,79,83,84,85,86,87,91,92,93,94,95,

%U 100,101,102,103,104,126,127,128,132,133,134

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

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

%K nonn,base

%O 1,2

%A _Clark Kimberling_