



2, 3, 5, 7, 17, 31, 71, 157, 257, 349, 641, 769, 3613, 16763, 233417, 9540317, 7391145211, 139697883473, 163069191377, 562142600387, 108169189705333, 1285424246556809, 1050111983810669984101, 17940124369540827523058309
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS



LINKS



EXAMPLE

233417 is an element of this sequence because A103372(83) = 233417.


MATHEMATICA

k = 4; Do[a[n] = 1, {n, k + 1}]; a[n_] := a[n] = a[n  k] + a[n  k  1]; Union[Select[Array[a, 400], PrimeQ]]
Select[LinearRecurrence[{0, 0, 0, 1, 1}, {1, 1, 1, 1, 1}, 500], PrimeQ] // Union (* Harvey P. Dale, May 30 2020 *)


CROSSREFS



KEYWORD

nonn,easy


AUTHOR



EXTENSIONS



STATUS

approved



