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

8, 72, 1000, 5488, 53240, 123032, 471648, 823080, 2141392, 6828920, 9533120, 23097768, 38595760, 48976312, 76413728, 139348872, 238239640, 281456440, 449941448, 601290480, 690894192, 1025521120, 1312822952, 1861118160

Offset

1,1

Links

Table of n, a(n) for n=1..24.

Formula

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

Mathematica

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

Prog

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

Crossrefs

Sequence in context: A279156 A129103 A111812 * A242597 A339469 A241032

Adjacent sequences: A138430 A138431 A138432 * A138434 A138435 A138436

Keyword

nonn,easy

Author

Artur Jasinski, Mar 19 2008

Status

approved