OFFSET
1,1
MATHEMATICA
Flatten[Position[#[[3]]-#[[2]]-#[[1]]+1&/@Partition[FoldList[Times, 1, Prime[ Range[ 6700]]] , 3, 1], _?PrimeQ]] (* Harvey P. Dale, Jul 25 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Pierre CAMI, Mar 19 2007
STATUS
approved