A138435 a(n) = ((n-th prime)^5-(n-th prime)^3)/6.

4, 36, 500, 2744, 26620, 61516, 235824, 411540, 1070696, 3414460, 4766560, 11548884, 19297880, 24488156, 38206864, 69674436, 119119820, 140728220, 224970724, 300645240, 345447096, 512760560, 656411476, 930559080, 1431071264

Offset: 1

Author

Artur Jasinski, Mar 19 2008

Keywords

• nonn
• easy

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Programs

Mathematica

a = {}; Do[p = Prime[n]; AppendTo[a, (p^5 - p^3)/6], {n, 1, 50}]; a
(#^5-#^3)/6&/@Prime[Range[30]] (* Harvey P. Dale, Apr 01 2019 *)

PARI

forprime(p=2,1e3,print1((p^5-p^3)/6", ")) \\ Charles R Greathouse IV, Jul 15 2011

Formula

a(n) = A138406(n)/6. - R. J. Mathar, Oct 15 2017