This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A066602 #15 Dec 06 2024 21:44:52 %S A066602 0,0,1,0,4,4,4,0,1,6,4,4,4,2,4,0,4,10,4,16,1,16,4,16,24,16,1,4,4,16,4, %T A066602 0,31,16,9,28,4,16,25,16,4,22,4,36,19,16,4,16,18,26,13,48,4,28,34,16, %U A066602 7,16,4,16,4,16,1,0,49,4,4,52,64,46,4,64,4,16,49 %N A066602 a(n) = 4^n mod n. %H A066602 Harry J. Smith, <a href="/A066602/b066602.txt">Table of n, a(n) for n = 1..1000</a> %e A066602 a(7) = 4 as 4^7 = 16384 = 7*2340 + 4. %p A066602 seq(irem(4^n,n),n=1..75); # _Zerinvary Lajos_, Apr 20 2008 %t A066602 Table[PowerMod[4, i, i], {i, 50}] %o A066602 (PARI) a(n) = { lift(Mod(4,n)^n) } \\ _Harry J. Smith_, Mar 09 2010 %K A066602 base,easy,nonn %O A066602 1,5 %A A066602 _Amarnath Murthy_, Dec 22 2001 %E A066602 More terms from _Harvey P. Dale_ and _Robert G. Wilson v_, Dec 23 2001