|
|
A073499
|
|
Numbers n such that n^(n+1) + (n+1)^n is prime.
|
|
6
|
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
1^2 + 2^1 = 3 and 2^3 + 3^2 = 17 are the primes corresponding to the first two terms. The next five terms correspond to primes of 155, 870, 2487, 3678 and 9106 decimal digits.
|
|
MATHEMATICA
|
Do[ If[ PrimeQ[n^(n + 1) + (n + 1)^n], Print[n]], {n, 1, 1650}]
|
|
PROG
|
(PARI) for(n=1, 1650, if(isprime((n^(n+1))+((n+1)^n)), print1(n, ", ")))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,hard
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|