login
A122220
a(n) = (prime(n)^6 - prime(n)^2)/20.
3
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,1
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)
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 *)
PROG
(PARI) forprime(p=2, 1e3, print1((p^6-p^2)/20", ")) \\ Charles R Greathouse IV, Jul 15 2011
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Artur Jasinski, Apr 16 2008
STATUS
approved