OFFSET
1,1
COMMENTS
No more terms up to 10000. - Rick L. Shepherd, May 16 2008
EXAMPLE
12^14 - 13^13 = 981043357956611, which is prime, so 13 is in the list.
MATHEMATICA
Select[Table[n, {n, 5, 400}], PrimeQ[(#-1)^(#+1)-#^#]&] (* Vladimir Joseph Stephan Orlovsky, Mar 03 2011*)
CROSSREFS
KEYWORD
hard,more,nonn
AUTHOR
Carl R. White, Feb 05 2008
EXTENSIONS
a(9) from Michael S. Branicky, Sep 05 2024
STATUS
approved