login
A138433
a(n) = ((n-th prime)^5-(n-th prime)^3)/3.
2
8, 72, 1000, 5488, 53240, 123032, 471648, 823080, 2141392, 6828920, 9533120, 23097768, 38595760, 48976312, 76413728, 139348872, 238239640, 281456440, 449941448, 601290480, 690894192, 1025521120, 1312822952, 1861118160
OFFSET
1,1
FORMULA
a(n) = A138406(n)/3. - R. J. Mathar, Oct 15 2017
MATHEMATICA
a = {}; Do[p = Prime[n]; AppendTo[a, (p^5 - p^3)/3], {n, 1, 50}]; a
(#^5-#^3)/3&/@Prime[Range[30]] (* Harvey P. Dale, Apr 27 2019 *)
PROG
(PARI) forprime(p=2, 1e3, print1((p^5-p^3)/3", ")) \\ Charles R Greathouse IV, Jul 15 2011
CROSSREFS
Sequence in context: A279156 A129103 A111812 * A242597 A339469 A241032
KEYWORD
nonn,easy
AUTHOR
Artur Jasinski, Mar 19 2008
STATUS
approved