OFFSET
1,10
MATHEMATICA
Do[ k = 0; While[ !PrimeQ[ (n + 1)^(2^k) + n^(2^k) ], k++ ]; Print[ 2^k ], {n, 1, 60} ].
CROSSREFS
KEYWORD
hard,nonn
AUTHOR
Robert G. Wilson v, Nov 14 2000
STATUS
approved