A122220 a(n) = (prime(n)^6 - prime(n)^2)/20.

3, 36, 780, 5880, 88572, 241332, 1206864, 2352276, 7401768, 29741124, 44375136, 128286252, 237505128, 316068060, 538960656, 1108217916, 2109026508, 2576018532, 4522918884, 6405013944, 7566711048, 12154372464, 16347018324, 24849064152, 41648599776

Offset: 1

Author

Artur Jasinski, Apr 16 2008

Keywords

• nonn
• easy

Crossrefs

Cf. A138448, A030516, A001248, A138441, A030514.

Programs

Maple

A122220:=n->(ithprime(n)^6-ithprime(n)^2)/20: seq(A122220(n), n=1..40); # Wesley Ivan Hurt, Apr 14 2017

Mathematica

(#^6-#^2)/20&/@Prime[Range[30]] (* Harvey P. Dale, Jan 19 2011 *)

PARI

forprime(p=2,1e3,print1((p^6-p^2)/20", ")) \\ Charles R Greathouse IV, Jul 15 2011

Formula

From Elmo R. Oliveira, Jan 18 2023: (Start)

a(n) = (A030516(n) - A001248(n))/20.

a(n) = A138441(n)/10.

a(n) = (A001248(n) * (A030514(n) - 1))/20. (End)