login
A153486
a(n) = prime(n)^6 - 512.
1
-448, 217, 15113, 117137, 1771049, 4826297, 24137057, 47045369, 148035377, 594822809, 887503169, 2565725897, 4750103729, 6321362537, 10779214817, 22164360617, 42180533129, 51520373849, 90458381657, 128100283409, 151334225777, 243087455009
OFFSET
1,1
LINKS
MATHEMATICA
a[k_] := Prime[k]^6 - 512;
Table[a[k], {k, 1, 30}]
Prime[Range[20]]^6-512 (* Harvey P. Dale, Jun 03 2014 *)
Table[Prime[n]^6 - 512, {n, 60}] (* Vincenzo Librandi, Aug 19 2016 *)
PROG
(Magma) [NthPrime(n)^6-512: n in [1..40]]; // Vincenzo Librandi, Ahu 19 2016
CROSSREFS
Sequence in context: A200071 A203960 A147628 * A062040 A093786 A251646
KEYWORD
sign
AUTHOR
Roger L. Bagula, Dec 27 2008
STATUS
approved