OFFSET
0,1
MATHEMATICA
Table[(-1)^(n-1)*Sum[Binomial[n, k]*Prime[k], {k, 1, n}], {n, 1, 20}] (* Vaclav Kotesovec, Mar 01 2016 *)
CROSSREFS
KEYWORD
sign
AUTHOR
N. J. A. Sloane, Dec 28 1999
STATUS
approved