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

%I #11 Oct 03 2023 22:23:36

%S 1,2,3,4,5,6,7,8,10,17,19,26,28,35,37,44,46,53,55,62,65,81,83,136,138,

%T 154,156,209,211,227,229,282,284,300,302,355,357,373,375,428,430,446,

%U 501,503,520,522,648,650,666,668,1089,1105,1107

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

%t Join[Range[7],Select[Range[2000],Union[Abs[Differences[IntegerDigits[#,8]]]]=={1}&]] (* _Harvey P. Dale_, Dec 28 2011 *)

%K nonn,base

%O 1,2

%A _Clark Kimberling_