A140893 a(n) = prime(n)^prime(n+1) - prime(n+1)^prime(n).

-1, 118, 61318, 1957839572, 32730551749894, 8640511341348431996, 233592048827366522661214, 257755012474380136537664158772, 3091054326372819773383775097721670599074, 2141662167055484666186673758527328459608763158

Offset: 1

Author

Juri-Stepan Gerasimov, Jul 07 2008

Keywords

• sign

Comments

a(n) > 0 for n>=2. - Robert Israel, Nov 02 2014

a(n) = A053089(n) - A078422(n). - Michel Marcus, Oct 10 2016

Examples

			n=1: a(1) = prime(1)^prime(1+1) - prime(1+1)^prime(1) = 2^3 - 3^2 = 8 - 9 = -1.
n=3: a(3) = prime(3)^prime(4) - prime(4)^prime(3) = 5^7 - 7^5 = 78125 - 16807 = 61318.
		

Links

• Robert Israel, Table of n, a(n) for n = 1..70

Crossrefs

Cf. A000040, A007965, A143776.

Programs

Magma

[NthPrime(n)^NthPrime(n+1)-NthPrime(n+1)^NthPrime(n): n in [1..10]]; // Vincenzo Librandi, Nov 02 2014

Maple

seq(ithprime(i)^ithprime(i+1)-ithprime(i+1)^ithprime(i), i=1..20); # Robert Israel, Nov 02 2014

Mathematica

Array[Prime[ # ]^Prime[ #+1]-Prime[ #+1]^Prime[ # ]&,16] (* Vladimir Joseph Stephan Orlovsky, Oct 11 2009 *)

Extensions

Corrected and extended by Vladimir Joseph Stephan Orlovsky, Oct 11 2009

a(10) from Vincenzo Librandi, Nov 02 2014