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

%I #5 May 13 2013 01:48:47

%S 5,60,1300,9800,147620,402220,2011440,3920460,12336280,49568540,

%T 73958560,213810420,395841880,526780100,898267760,1847029860,

%U 3515044180,4293364220,7538198140,10675023240,12611185080,20257287440,27245030540

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

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

%o (PARI) forprime(p=2,1e3,print1((p^6-p^2)/12", ")) \\ _Charles R Greathouse IV_, Jul 15 2011

%K nonn,easy

%O 1,1

%A _Artur Jasinski_, Mar 19 2008