login
A138451
a(n) = (prime(n)^6-prime(n)^2)/60.
3
1, 12, 260, 1960, 29524, 80444, 402288, 784092, 2467256, 9913708, 14791712, 42762084, 79168376, 105356020, 179653552, 369405972, 703008836, 858672844, 1507639628, 2135004648, 2522237016, 4051457488, 5449006108, 8283021384
OFFSET
1,2
LINKS
FORMULA
a(n) = A213547(prime(n)-1). - Robert Israel, Sep 11 2014
MAPLE
seq((ithprime(n)^6-ithprime(n)^2)/60, n=1..100); # Robert Israel, Sep 11 2014
MATHEMATICA
a = {}; Do[p = Prime[n]; AppendTo[a, (p^6 - p^2)/60, {n, 1, 50}]; a
(#^6-#^2)/60&/@Prime[Range[30]] (* Harvey P. Dale, Sep 11 2014 *)
PROG
(PARI) forprime(p=2, 1e3, print1((p^6-p^2)/60", ")) \\ Charles R Greathouse IV, Jul 15 2011
(Magma) [( NthPrime(n)^6-NthPrime(n)^2 )/60: n in [1..30]]; // Vincenzo Librandi, Sep 11 2014
CROSSREFS
Sequence in context: A053324 A297717 A352971 * A295844 A113672 A259269
KEYWORD
nonn,easy,less
AUTHOR
Artur Jasinski, Mar 19 2008
STATUS
approved