OFFSET
1,1
LINKS
Shawn A. Broyles, Table of n, a(n) for n = 1..1000
EXAMPLE
31 = prime(11) = prime(4) + prime(9) + 1,
41 = prime(13) = prime(5) + prime(10) + 1, and
61 = prime(18) = prime(8) + prime(13) + 1 are in the sequence.
MATHEMATICA
lst={}; Do[p1=Prime[n]; p6=Prime[n+5]; p=p1+p6+1; If[PrimeQ[p], AppendTo[lst, p]], {n, 6!}]; lst
PROG
(PARI) lista(nn) = {for (n=1, nn, if (isprime(p = prime(n) + prime(n+5) + 1), print1(p, ", ")); ); } \\ Michel Marcus, May 01 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vladimir Joseph Stephan Orlovsky, Apr 03 2009
EXTENSIONS
Examples edited by R. J. Mathar, Apr 06 2009
STATUS
approved