OFFSET
1,1
COMMENTS
It seems that this sequence contains infinitely many terms.
See also A234569 for a similar sequence.
LINKS
Zhi-Wei Sun, Table of n, a(n) for n = 1..60
EXAMPLE
a(1) = 2 since P(2+1) = 3 is prime.
a(2) = 3 since P(3+1) = 5 is prime.
a(3) = 5 since P(5+1) = 11 is prime.
MATHEMATICA
p[k_]:=p[k]=PrimeQ[PartitionsP[Prime[k]+1]]
n=0; Do[If[p[k], n=n+1; Print[n, " ", Prime[k]]], {k, 1, 10000}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Zhi-Wei Sun, Jan 01 2014
STATUS
approved