|
%I #7 Feb 13 2023 11:55:07
%S 1,3,5,7,1,1,1,3,1,5,1,7,2,1,2,3,2,5,2,7,3,1,3,3,3,5,3,7,4,1,4,3,4,5,
%T 4,7,5,1,5,3,5,5,5,7,6,1,6,3,6,5,6,7,7,1,7,3,7,5,7,7,1,0,1,1,0,3,1,0,
%U 5,1,0,7,1,1,1,1,1,3,1,1,5,1,1,7,1,2,1,1,2,3
%N Write 2n-1 in base 8 and juxtapose.
%t Table[IntegerDigits[2n-1,8],{n,50}]//Flatten (* _Harvey P. Dale_, Feb 13 2023 *)
%K nonn,base
%O 1,2
%A _Clark Kimberling_
|
