A241427 Smallest prime of the form n^k - k^n for some k, or 0 if no such prime exists.
7, 2, 3, 6102977801, 5, 79792265017612001, 7, 2486784401
Offset: 2
Keywords
Links
- Derek Orr, Table of n, a(n) for n = 2..16
Crossrefs
Cf. A078201.
Programs
-
PARI
a(n)=k=1;if(n>4,forprime(p=1,100,if(ispower(n)&&ispower(n)%p==0&&n%p==0,return(0));if(n%p==n,break)));k=1;while(!ispseudoprime(n^k-k^n),k++);return(n^k-k^n) vector(15, n, a(n+1))
Comments