%I #34 Aug 13 2014 15:50:30
%S 1,1,2,1,24,1,54,69,2,1,3100,1
%N Least number k such that n^k + k^n is prime or 0 if no such k exists.
%C More terms given in links.
%C a(n) = 1 if and only if n + 1 is prime. Thus there are infinitely many nonzero entries.
%C For n in A016767, a(n) = 0 since n^k + k^n is factorable and will never be prime. Thus there are infinitely many zero entries.
%C If a(i) = j then a(j) <= i for all i and j not equal to 0.
%C a(n) and n must have opposite parity. If n is odd/even, a(n) must be even/odd, respectively.
%C Further, gcd(n, a(n)) = 1 for all n.
%H H. Lifchitz and R. Lifchitz, <a href="http://primenumbers.net/prptop/searchform.php?form=x%5Ey%2By%5Ex&action=Search">PRP Top Records. Search for x^y+y^x</a>
%H Derek Orr, <a href="/A243147/a243147.txt">Table for n, a(n) for n = 1..100 (unknown k-values are marked "unknown")</a>
%e 3^1 + 1^3 = 4 is not prime. 3^2 + 2^3 = 17 is prime. So a(3) = 2.
%o (PARI) a(n)=if(ispower(n)&&ispower(n)%3==0&&n%3==0,return(0));k=1;while(!ispseudoprime(n^k+k^n),k++);return(k)
%o vector(12, n, a(n))
%Y Cf. A016767.
%K nonn,hard,more
%O 1,3
%A _Derek Orr_, May 30 2014
|