SEQUENCE A100401, A100402 & A100403.

[Robert G. Wilson v]

Who was the %Author? Bob.

%I A100403
%S A100403 1,6,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,
%T A100403 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,
%U A100403 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9
%N A100403 Digital root of 6^n.
%o A100403 (PARI) f(n,m) = for(x=0,n,print1(droot(m^x)",")) droot(n) = \ the 
digital root of a number. { local(x); x= n%9; if(x>0,return(x),return(9)) }
%t A100403 Table[ Mod[ PowerMod[ 6, n, 9] +8, 9] +1, {n, 0, 104}] (from RGWv Jan 
08 2005)
%K A100403 easy,nonn
%O A100403 0,2
%E A100403 More terms from Cino Hilliard (hillcino368(AT)hotmail.com), Dec 31 2004

%N A100402 Digital root of 4^n.

%N A100401 Digital root of 3^n.