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

%I #9 Dec 29 2023 10:39:34

%S 2,27,625,4802,73205,199927,1002252,1954815,6156502,24754835,36940840,

%T 106827177,197803270,263247677,448930652,923186277,1757017345,

%U 2146105355,3768259627,5336453010,6304409502,10127021060,13620538127

%N a(n) = ((n-th prime)^6-(n-th prime)^4)/24.

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

%t (#^6-#^4)/24&/@Prime[Range[30]] (* _Harvey P. Dale_, Apr 27 2018 *)

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

%K nonn,easy

%O 1,1

%A _Artur Jasinski_, Mar 22 2008