OFFSET
1,2
COMMENTS
Note that 28 and 496 are perfect numbers (see A000396).
a(6) > 1500.
a(6) > 25000. - Michael S. Branicky, Nov 12 2024
EXAMPLE
For n = 1, 1^1 + 1! + 1 = 3, which is prime.
For n = 2, 2^2 + 2! + 1 = 4 + 2 + 1 = 7, which is prime.
For n = 4, 4^4 + 4! + 1 = 281, which is prime.
MATHEMATICA
Select[Range[1500], PrimeQ[#^# + #! + 1]&]
PROG
(PARI) for(n=1, 10^3, if(ispseudoprime(n^n+n!+1), print1(n, ", "))) \\ Derek Orr, Mar 06 2015
CROSSREFS
KEYWORD
nonn,more,hard
AUTHOR
Waldemar Puszkarz, Mar 04 2015
STATUS
approved