A138447 a(n) = ((n-th prime)^6-(n-th prime^2))/12.

5, 60, 1300, 9800, 147620, 402220, 2011440, 3920460, 12336280, 49568540, 73958560, 213810420, 395841880, 526780100, 898267760, 1847029860, 3515044180, 4293364220, 7538198140, 10675023240, 12611185080, 20257287440, 27245030540

Offset

1,1

Links

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

Mathematica

a = {}; Do[p = Prime[n]; AppendTo[a, (p^6 - p^2)/12, {n, 1, 50}]; a

Prog

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

Crossrefs

Sequence in context: A349883 A010793 A180614 * A084939 A171205 A214380

Adjacent sequences: A138444 A138445 A138446 * A138448 A138449 A138450

Keyword

nonn,easy

Author

Artur Jasinski, Mar 19 2008

Status

approved