%I
%S 1,3,5,7,1,0,1,2,1,4,1,6,1,8,2,1,2,3,2,5,2,7,3,0,3,2,3,4,3,6,3,8,4,1,
%T 4,3,4,5,4,7,5,0,5,2,5,4,5,6,5,8,6,1,6,3,6,5,6,7,7,0,7,2,7,4,7,6,7,8,
%U 8,1,8,3,8,5,8,7,1,0,0,1,0,2,1,0,4,1,0,6,1,0
%N Write 2n-1 in base 9 and juxtapose.
%t Table[IntegerDigits[2n-1,9],{n,50}]//Flatten (* _Harvey P. Dale_, Jul 22 2019 *)
%K nonn,base
%O 1,2
%A _Clark Kimberling_
|