OFFSET
0,2
MATHEMATICA
g[x_] := Prime[x]+Prime[x-1]-g[x-1] g[0]=0; g[1]=4; Table[g[w], {w, 0, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Apr 25 2003
EXTENSIONS
Definition corrected by Georg Fischer, May 15 2024
STATUS
approved