A097499 Numbers of the form p^q + q^p where p and q are consecutive primes.

17, 368, 94932, 1996813914, 36314872537968, 8660320497414243870, 244552822542936127033092, 257904243416235317958787975746, 3091062959814255272215316579358416079052

Offset: 1

Author

Cino Hilliard, Aug 24 2004

Keywords

• nonn

Comments

The first term is the only prime in the sequence.

Links

• Amiram Eldar, Table of n, a(n) for n = 1..75

Crossrefs

Cf. A053089, A078422.

Programs

Mathematica

lst={}; Do[p=Prime[n]; q=Prime[n+1]; a=p^q+q^p; AppendTo[lst,a],{n,4!}]; lst (* Vladimir Joseph Stephan Orlovsky, Aug 16 2009 *)
First[#]^Last[#]+Last[#]^First[#]&/@Partition[Prime[Range[10]],2,1] (* Harvey P. Dale, Sep 20 2011 *)

PARI

f(n) = for(x=1,n,p=prime(x);q=prime(x+1);v=p^q+q^p;print1(v","))

Formula

a(n) = A053089(n) + A078422(n). - Amiram Eldar, Jul 07 2024

Extensions

Offset corrected by Amiram Eldar, Jul 07 2024