The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #7 Jan 23 2019 13:49:28
%S 2,24,520,3920,59048,160888,804576,1568184,4934512,19827416,29583424,
%T 85524168,158336752,210712040,359307104,738811944,1406017672,
%U 1717345688,3015279256,4270009296,5044474032,8102914976,10898012216,16566042768
%N a(n) = ((n-th prime)^6-(n-th prime^2))/30.
%t a = {}; Do[p = Prime[n]; AppendTo[a, (p^6 - p^2)/30, {n, 1, 50}]; a
%t (#^6-#^2)/30&/@Prime[Range[30]] (* _Harvey P. Dale_, Jan 23 2019 *)
%o (PARI) forprime(p=2,1e3,print1((p^6-p^2)/30", ")) \\ _Charles R Greathouse IV_, Jul 15 2011
%K nonn,easy
%O 1,1
%A _Artur Jasinski_, Mar 19 2008, Mar 22 2008