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

6, 54, 750, 4116, 39930, 92274, 353736, 617310, 1606044, 5121690, 7149840, 17323326, 28946820, 36732234, 57310296, 104511654, 178679730, 211092330, 337456086, 450967860, 518170644, 769140840, 984617214, 1395838620

Offset

1,1

Links

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

Formula

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

Mathematica

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

Prog

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

Crossrefs

Sequence in context: A072034 A167571 A366232 * A360545 A217238 A171681

Adjacent sequences: A138431 A138432 A138433 * A138435 A138436 A138437

Keyword

nonn,easy

Author

Artur Jasinski, Mar 19 2008

Status

approved