OFFSET
0,3
LINKS
Robert G. Wilson v, Table of n, a(n) for n = 0..1000
MATHEMATICA
a[0] = 0; a[1] = 1; a[n_] := a[n] = NextPrime[a[n - 1] + a[n - 2]]; Array[a, 36, 0] (* Robert G. Wilson v, Mar 13 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Jul 08 2000
STATUS
approved