OFFSET
1,2
MATHEMATICA
Table[4^p-p^4, {p, Prime[Range[20]]}] (* Harvey P. Dale, May 28 2020 *)
PROG
(PARI) forprime(p=2, 41, print1(4^p-p^4, ", "))
CROSSREFS
KEYWORD
sign
AUTHOR
Parthasarathy Nambi, Sep 16 2004
EXTENSIONS
Edited and extended by Klaus Brockhaus, Sep 18 2004
STATUS
approved