OFFSET
1,1
EXAMPLE
7 is in this sequence because A103376(27) = 7, which is prime.
MATHEMATICA
k = 8; Do[a[n] = 1, {n, k + 1}]; a[n_] := a[n] = a[n - k] + a[n - k - 1]; Union[Select[Array[a, 500], PrimeQ]]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jonathan Vos Post, Feb 05 2005
EXTENSIONS
Edited and extended by Ray Chandler, Feb 10 2005
STATUS
approved