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

Author

Artur Jasinski, Mar 19 2008

Keywords

• nonn
• easy

Programs

Mathematica

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

PARI

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