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 A138426 #26 Sep 08 2022 08:45:33
%S A138426 6,48,624,3360,32208,74256,283968,495216,1287264,4102224,5725824,
%T A138426 13868784,23171232,29401680,45868992,83639088,142984848,168919248,
%U A138426 270025008,360845856,414614304,615411264,787808112,1116811872
%N A138426 a(n) = ((prime(n))^5-prime(n))/5.
%C A138426 Number of monic irreducible polynomials of degree 5 over GF(prime(n)). - _Robert Israel_, Jan 07 2015
%H A138426 Vincenzo Librandi, <a href="/A138426/b138426.txt">Table of n, a(n) for n = 1..200</a>
%H A138426 Wikipedia, <a href="http://en.wikipedia.org/wiki/Necklace_polynomial">Necklace polynomial</a>
%F A138426 a(n) = A138404(n)/5. - _R. J. Mathar_, Oct 15 2017
%p A138426 seq((ithprime(i)^5-ithprime(i))/5, i = 1 .. 50); # _Robert Israel_, Jan 07 2015
%t A138426 a = {}; Do[p = Prime[n]; AppendTo[a, (p^5 - p)/5], {n, 1, 50}]; a
%t A138426 (#^5-#)/5&/@Prime[Range[30]] (* _Harvey P. Dale_, Mar 12 2018 *)
%o A138426 (Magma) [(NthPrime((n))^5 - NthPrime((n)))/5: n in [1..30] ]; // _Vincenzo Librandi_, Jun 18 2011
%o A138426 (PARI) forprime(p=2,1e3,print1((p^5-p)/5", ")) \\ _Charles R Greathouse IV_, Jul 15 2011
%Y A138426 Cf. A008837, A127919, A138420, A208536.
%K A138426 nonn,easy
%O A138426 1,1
%A A138426 _Artur Jasinski_, Mar 19 2008