A138460 a(n) = ((n-th prime)^6-(n-th prime)^5)/2.

16, 243, 6250, 50421, 805255, 2227758, 11358856, 22284891, 70799773, 287156086, 429437265, 1248191226, 2317124020, 3087177303, 5274935161, 10873082818, 20732804671, 25337889030, 44554128531, 63148027285, 74630577348

Offset: 1

Author

Artur Jasinski, Mar 22 2008

Keywords

• nonn
• easy

Programs

Mathematica

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

PARI

forprime(p=2,1e3,print1((p^6-p^5)/2", ")) \\ Charles R Greathouse IV, Jun 16 2011