A094108 Primes of form prime(n)!+prime(n+1).

5, 11, 127, 5051, 4470115461512684340891257138125051110076800700282905015819080092370422104067183317016903680000000000000079

Offset

1,1

Comments

The next term is too large to include: it is 1,100 digits long and is generated when n=93.

Links

Table of n, a(n) for n=1..5.

Maple

a:=proc(n) if isprime(ithprime(n)!+ithprime(n+1))=true then ithprime(n)!+ithprime(n+1) else fi end: seq(a(n), n=1..45); # Emeric Deutsch, Jun 24 2005

Mathematica

Select[#[[1]]!+#[[2]]&/@Partition[Prime[Range[30]], 2, 1], PrimeQ] (* Harvey P. Dale, Jul 03 2013 *)

Crossrefs

Values of n for which prime(n)!+prime(n+1) is prime are in A109302.

Sequence in context: A262309 A266421 A328445 * A222674 A197538 A083418

Adjacent sequences: A094105 A094106 A094107 * A094109 A094110 A094111

Keyword

nonn

Author

Giovanni Teofilatto, May 03 2004

Extensions

More terms from Emeric Deutsch, Jun 24 2005

Comment extended by Harvey P. Dale, Jul 03 2013

Status

approved