A097201 Numbers of the form 4^p - p^4 for p prime.
0, -17, 399, 13983, 4179663, 67080303, 17179785663, 274877776623, 70368743897823, 288230376151004463, 4611686018426464383, 18889465931478578980623, 4835703278458516695998943
Offset: 1
Keywords
Programs
-
Mathematica
Table[4^p-p^4,{p,Prime[Range[20]]}] (* Harvey P. Dale, May 28 2020 *)
-
PARI
forprime(p=2,41,print1(4^p-p^4,","))
Extensions
Edited and extended by Klaus Brockhaus, Sep 18 2004