OFFSET
1,1
EXAMPLE
PROG
(PARI) {forprime(p=2, 810, if(isprime(q=(p-1)^4+p^4+(p+1)^4), print1(q, ", ")))} /* Klaus Brockhaus, Mar 27 2007 */
CROSSREFS
KEYWORD
nonn
AUTHOR
Tomas Xordan, Mar 05 2007
EXTENSIONS
Edited and corrected by Klaus Brockhaus, Mar 27 2007
STATUS
approved