The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #13 Sep 08 2022 08:45:33
%S 10,80,1040,5600,53680,123760,473280,825360,2145440,6837040,9543040,
%T 23114640,38618720,49002800,76448320,139398480,238308080,281532080,
%U 450041680,601409760,691023840,1025685440,1313013520,1861353120
%N a(n) = (prime(n)^5 - prime(n))/3.
%H Vincenzo Librandi, <a href="/A138425/b138425.txt">Table of n, a(n) for n = 1..200</a>
%F a(n) = A138404(n)/3. - _R. J. Mathar_, Oct 15 2017
%t a = {}; Do[p = Prime[n]; AppendTo[a, (p^5 - p)/3], {n, 1, 50}]; a
%o (Magma) [(NthPrime((n))^5 - NthPrime((n)))/3: n in [1..30] ]; // _Vincenzo Librandi_, Jun 18 2011
%o (PARI) forprime(p=2,1e3,print1((p^5-p)/3", ")) \\ _Charles R Greathouse IV_, Jul 15 2011
%K nonn,easy
%O 1,1
%A _Artur Jasinski_, Mar 19 2008