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 A179398 #15 Jan 06 2019 04:54:50
%S A179398 1,1,4,2,9,9,8,11,12,28,20,26,21,41,8,37,26,22,10,2,37,8,75,18,3,64,
%T A179398 100,79,48,11,17,62,59,46,47,105,99,93,29,151,17,75,64,131,85,187,113,
%U A179398 100,144,144,91,85,2,73,196,196,144,144,256,114,218,107,100,89,263,266,324,256,144,324,47,41,256,256,324
%N A179398 a(n) = prime(n)^2 mod prime(n-3).
%e A179398 a(1) = 7^2 mod 2 = 49 mod 2 = 1;
%e A179398 a(2) = 11^2 mod 3 = 121 mod 3 = 1;
%e A179398 a(3) = 13^2 mod 5 = 169 mod 5 = 4;
%e A179398 a(4) = 17^2 mod 7 = 289 mod 7 = 2.
%p A179398 A179398 := proc(n) ithprime(n)^2 mod ithprime(n-3); end proc: # _R. J. Mathar_, Jan 09 2011
%t A179398 Table[PowerMod[Prime[n],2,Prime[n-3]],{n,4,80}] (* _Harvey P. Dale_, Dec 13 2011 *)
%Y A179398 Cf. A038702.
%K A179398 nonn
%O A179398 4,3
%A A179398 _Umut Uludag_, Jan 07 2011