login
n-th digit in the base-6 expansion of 1/n.
0

%I #15 Jul 31 2019 21:12:23

%S 0,0,0,0,1,0,0,0,0,3,0,0,0,2,2,0,0,0,0,4,4,1,0,0,5,1,0,4,0,1,0,0,0,1,

%T 0,0,0,0,5,2,0,0,0,5,4,0,0,0,0,5,4,0,0,0,3,5,3,0,0,3,0,0,3,0,5,4,0,1,

%U 3,0,0,0,0,0,1,5,5,4,0,1,0,0,0,3,1,0,2,0,0,2,4,2,2,0,3,0,0,5,4,5

%N n-th digit in the base-6 expansion of 1/n.

%e a(10) = 3, as the 10th digit in the base-6 expansion of 1/10 = 0.03030303030303030303... is 3.

%t a = {}; Do[a = Append[a, Mod[ Floor[1/n * 6^n], 6] ], {n, 1, 100} ]; a

%Y Column 6 of A322392.

%Y Cf. A061480, A323547, A323591, A323592.

%K nonn,base,easy

%O 1,10

%A _Joseph A. Stocke_, May 21 2019