|
|
A138432
|
|
a(n) = ((n-th prime)^5-(n-th prime)^3)/2.
|
|
2
|
|
|
12, 108, 1500, 8232, 79860, 184548, 707472, 1234620, 3212088, 10243380, 14299680, 34646652, 57893640, 73464468, 114620592, 209023308, 357359460, 422184660, 674912172, 901935720, 1036341288, 1538281680, 1969234428, 2791677240
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
a = {}; Do[p = Prime[n]; AppendTo[a, (p^5 - p^3)/2], {n, 1, 50}]; a
Table[(n^5-n^3)/2, {n, Prime[Range[30]]}] (* Harvey P. Dale, Jul 17 2015 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|