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 A077254 #15 May 13 2025 15:55:26 %S A077254 0,1,2,1,1,1,3,1,8,1,9,1,2,1,8,1,8,1,10,1,13,15,14,1,7,9,1,9,22,19,3, %T A077254 1,26,9,4,1,9,7,5,1,15,1,19,9,17,41,23,1,31,1,11,1,29,1,23,9,8,13,41, %U A077254 1,39,41,55,1,53,31,63,13,8,1,69,1,2,9,49,5,16,25,6,1,80,39,16,1,29,83 %N A077254 a(n) = prime(n)^n mod n. %C A077254 a(A077255(n)) = 1. %H A077254 Zak Seidov, <a href="/A077254/b077254.txt">Table of n, a(n) for n = 1..10000</a> %e A077254 a(13) = prime(13)^13 mod 13 = 41^13 mod 13 = 925103102315013629321 mod 13 = 2. %p A077254 a:= n-> ithprime(n) &^ n mod n: %p A077254 seq(a(n), n=1..100); # _Alois P. Heinz_, Dec 07 2012 %t A077254 Table[PowerMod[Prime[n], n, n], {n, 100}] (* _Zak Seidov_, Dec 07 2012 *) %Y A077254 a(n) = A062457(n) mod n, A077256, A000040, A000027. %K A077254 nonn %O A077254 1,3 %A A077254 _Reinhard Zumkeller_, Oct 31 2002