OFFSET
1,1
COMMENTS
Primes of the form A034961(k)/5, associated with k=1, 2, 21, 31, 42, 66,... - R. J. Mathar, Aug 02 2009
EXAMPLE
p=2 is in the sequence because 2*5=10=2+3+5.
p=3 is in the sequence because 3*5=15=3+5+7.
MATHEMATICA
lst={}; Do[If[PrimeQ[p=(Prime[n]+Prime[n+1]+Prime[n+2])/5], AppendTo[lst, p]], {n, 7!}]; lst
cp3Q[n_]:=Module[{mid=Floor[PrimePi[(5n)/3]], tst}, tst=Total/@ Partition[ Prime[ Range[mid-10, mid+10]], 3, 1]; MemberQ[tst, 5n]]; Select[ Prime[ Range[ 500]], cp3Q]//Quiet (* Harvey P. Dale, Jan 02 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Jul 28 2009
EXTENSIONS
Entries checked by R. J. Mathar, Aug 02 2009
STATUS
approved