A163319 -id:A163319 - cp's OEIS frontend

A123206 Primes of the form x^y - y^x, for x,y > 1.

7, 17, 79, 431, 58049, 130783, 162287, 523927, 2486784401, 6102977801, 8375575711, 13055867207, 83695120256591, 375700268413577, 2251799813682647, 9007199254738183, 79792265017612001, 1490116119372884249

Offset: 1

Alexander Adamchuk, Oct 04 2006

nonn

These are the primes in A045575, numbers of the form x^y - y^x, for x,y > 1. This includes all primes from A122735, smallest prime of the form (n^k - k^n) for k>1.

If y=1 was allowed, any prime p could be obtained for x=p+1. This motivates to consider sequence A243100 of primes of the form x^(y+1)-y^x. - M. F. Hasler, Aug 19 2014

			The primes 6102977801 and 1490116119372884249 are of the form 5^y-y^5 (for y=14 and y=26) and therefore members of this sequence. The next larger primes of this form would have y > 4500 and would be much too large to be included. - _M. F. Hasler_, Aug 19 2014

T. D. Noe, Table of n, a(n) for n=1..101 (terms < 10^400)
H. Lifchitz & R. Lifchitz, PRP of the form x^y-y^x on primenumbers.net.

Cf. A045575, A122735, A078202, A082754, A055651, A094133.
A163319 is the subsequences for fixed x=3, A243114 for x=6.
Cf. A072180, A109387, A117705, A117706, A128447, A128449, A128450, A128451, A122003, A128453, A128454.

N:= 10^100: # to get all terms <= N
A:= NULL:
for x from 2 while x^(x+1) - (x+1)^x <= N do
   for y from x+1 do
      z:= x^y - y^x;
      if z > N then break
      elif z > 0 and isprime(z) then A:=A, z;
      fi
od od:
{A}; # Robert Israel, Aug 29 2014

Take[Select[Intersection[Flatten[Table[Abs[x^y-y^x],{x,2,120},{y,2,120}]]],PrimeQ[ # ]&],25]
nn=10^50; n=1; t=Union[Reap[While[n++; k=n+1; num=Abs[n^k-k^n]; num0&&PrimeQ[#]&]],nn]] (* Harvey P. Dale, Nov 23 2013 *)

a=[];for(S=1,199,for(x=2,S-2,ispseudoprime(p=x^(y=S-x)-y^x)&&a=concat(a,p)));Set(a) \\ May be incomplete in the upper range of values, i.e., beyond a given S=x+y, a larger S may yield a smaller prime (for small x). - M. F. Hasler, Aug 19 2014

A243114 Primes of the form 6^x-x^6.

Original entry on oeis.org

5, 162287, 13055867207, 1719070799748422589190392551, 174588755932389037098918153698589675008087, 307180606913594390117978657628360735703373091543821695941623353827100004182413811352186951

Offset: 1

M. F. Hasler, Aug 20 2014

nonn

The next term is too large to include.
See A117706 for the corresponding numbers x.
The next term has 113 digits. - Harvey P. Dale, Jan 17 2018

Cf. A024068, A123206, A163319.

Cf. A072180, A109387, A117705, A117706, A128447, A128448, A128449, A128450, A128451, A122003, A128453, A128454.

Select[Table[6^x-x^6,{x,200}],PrimeQ] (* Harvey P. Dale, Jan 17 2018 *)

for(x=1,1e5,ispseudoprime(p=6^x-x^6)&&print1(p","))

cp's OEIS Frontend

A123206 Primes of the form x^y - y^x, for x,y > 1.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

PARI

A243114 Primes of the form 6^x-x^6.

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

PARI

A182360 Primes of the form 2^n - n^4.

Views

Author

Keywords

Crossrefs