OFFSET
0,3
LINKS
Paolo Xausa, Table of n, a(n) for n = 0..10000
MATHEMATICA
Join[{0}, Accumulate[FoldList[#2-#1&, 0, Prime[Range[100]]]]] (* Paolo Xausa, Dec 04 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul Curtz, Jul 15 2022
STATUS
approved