A138451 a(n) = (prime(n)^6-prime(n)^2)/60.

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

Harvey P. Dale, Table of n, a(n) for n = 1..1000

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

Cf. A000040, A213547.

Sequence in context: A053324 A297717 A352971 * A295844 A113672 A259269

Adjacent sequences: A138448 A138449 A138450 * A138452 A138453 A138454

Keyword

nonn,easy,less

Author

Artur Jasinski, Mar 19 2008

Status

approved