OFFSET
1,1
COMMENTS
A034962 is a subsequence. - R. J. Mathar, Sep 17 2008
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
MATHEMATICA
Module[{nn=50}, Select[Union[Flatten[Table[Total/@Partition[Prime[ Range[ nn]], n, 1], {n, Prime[Range[PrimePi[nn]]]}]]], PrimeQ]] (* Harvey P. Dale, Nov 28 2021 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, May 09 2003
EXTENSIONS
Data corrected and extended, and erroneous program deleted, by Harvey P. Dale, Nov 28 2021
STATUS
approved