A066439 - OEIS

%I #16 Dec 07 2024 13:40:25

%S 0,0,2,0,3,4,1,0,8,4,8,4,8,8,2,0,8,10,8,16,8,20,8,16,18,12,26,8,8,4,8,

%T 0,17,30,22,28,8,26,5,16,8,22,8,4,8,18,8,16,1,24,2,40,8,28,32,8,56,6,

%U 8,16,8,2,8,0,8,58,8,16,29,64,8,64,8,64,32,68,57,64,8,16

%N a(n) = 8^n mod n.

%H Harry J. Smith, <a href="/A066439/b066439.txt">Table of n, a(n) for n = 1..1000</a>

%p seq(irem(8^n,n),n=1..80); # _Zerinvary Lajos_, Apr 20 2008

%t Table[PowerMod[8, n, n], {n, 80} ]

%o (Sage) [power_mod(8,n,n)for n in range(1,81)] # _Zerinvary Lajos_, Nov 28 2009

%o (PARI) a(n) = { lift(Mod(8, n)^n) } \\ _Harry J. Smith_, Feb 14 2010

%K nonn

%O 1,3

%A _Robert G. Wilson v_, Dec 27 2001