A138453 a(n) = ((n-th prime)^6-(n-th prime)^4)/2.
24, 324, 7500, 57624, 878460, 2399124, 12027024, 23457780, 73878024, 297058020, 443290080, 1281926124, 2373639240, 3158972124, 5387167824, 11078235324, 21084208140, 25753264260, 45219115524, 64037436120, 75652914024
Offset: 1
Programs
-
Mathematica
a = {}; Do[p = Prime[n]; AppendTo[a, (p^6 - p^4)/2], {n, 1, 24}]; a
-
PARI
forprime(p=2,1e3,print1((p^6-p^4)/2", ")) \\ Charles R Greathouse IV, Jul 15 2011