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 A138428 #15 Sep 08 2022 08:45:33
%S A138428 3,24,312,1680,16104,37128,141984,247608,643632,2051112,2862912,
%T A138428 6934392,11585616,14700840,22934496,41819544,71492424,84459624,
%U A138428 135012504,180422928,207307152,307705632,393904056,558405936,858734016,1051010040
%N A138428 a(n) = (prime(n)^5 - prime(n))/10.
%H A138428 Vincenzo Librandi, <a href="/A138428/b138428.txt">Table of n, a(n) for n = 1..200</a>
%F A138428 a(n) = A138404(n)/10. - _R. J. Mathar_, Oct 15 2017
%t A138428 a = {}; Do[p = Prime[n]; AppendTo[a, (p^5 - p)/10], {n, 1, 50}]; a
%t A138428 (#^5-#)/10&/@Prime[Range[30]] (* _Harvey P. Dale_, Dec 18 2014 *)
%o A138428 (Magma) [(NthPrime((n))^5 - NthPrime((n)))/10: n in [1..30]]; // _Vincenzo Librandi_, Jun 18 2011
%o A138428 (PARI) forprime(p=2,1e3,print1((p^5-p)/10", ")) \\ _Charles R Greathouse IV_, Jul 15 2011
%K A138428 nonn,easy
%O A138428 1,1
%A A138428 _Artur Jasinski_, Mar 19 2008