|
%I #10 Jan 29 2019 02:31:21
%S 0,0,1,0,0,2,0,0,3,1,0,1,0,1,0,0,0,3,0,0,3,0,0,2,0,0,1,1,0,0,0,0,1,0,
%T 1,1,0,0,1,2,0,1,0,1,1,0,0,1,2,3,1,0,0,2,2,2,1,0,0,0,0,0,1,0,3,2,0,3,
%U 0,3,0,0,0,0,1,3,0,0,0,3,3,0,0,0,0,0,0,0,0,1,0,2,0,0,2,2,0,1,3,1
%N n-th digit in the base-4 expansion of 1/n.
%e a(9) = 3, as the 9th digit in the base-4 expansion of 1/9 = 0.013013013013013013013013... is 3.
%t a = {}; Do[a = Append[a, Mod[ Floor[1/n * 4^n], 4] ], {n, 1, 100} ]; a
%Y Column 4 of A322392.
%Y Cf. A061480.
%K nonn,base,easy
%O 1,6
%A _Derek J. Graves_, Jan 18 2019, on behalf of Joseph A. Stocke
|
