A138436 a(n) = ((n-th prime)^5-(n-th prime)^3)/8.
3, 27, 375, 2058, 19965, 46137, 176868, 308655, 803022, 2560845, 3574920, 8661663, 14473410, 18366117, 28655148, 52255827, 89339865, 105546165, 168728043, 225483930, 259085322, 384570420, 492308607, 697919310, 1073303448
Offset: 1
Programs
-
Mathematica
a = {}; Do[p = Prime[n]; AppendTo[a, (p^5 - p^3)/8], {n, 1, 50}]; a
-
PARI
forprime(p=2,1e3,print1((p^5-p^3)/8", ")) \\ Charles R Greathouse IV, Jul 15 2011
Formula
a(n) = A138406(n)/8. - R. J. Mathar, Oct 15 2017