A098997 (1/30)*(p(p+1)(2p+1)(3p^2+3p-1)) where p is prime.
17, 98, 979, 4676, 39974, 89271, 327369, 562666, 1431244, 4463999, 6197520, 14822755, 24607093, 31137590, 48343448, 87633963, 149111998, 175917839, 280200834, 373671012, 428943109, 635050664, 811727882, 1148417997
Offset: 1
Keywords
Examples
If p=2, (1/30)*(2*(2+1)*(2*2+1)*(3*2^2+3*2-1)) = 17
Crossrefs
Similar to A034953
Programs
-
Mathematica
Table[(p(p+1)(2p+1)(3p^2+3p-1))/30,{p,Prime[Range[30]]}] (* Harvey P. Dale, Mar 10 2019 *)
Extensions
More terms from Klaus Brockhaus, Nov 09 2004