|
|
|
|
2, 3, 5, 7, 17, 31, 71, 157, 227, 293, 349, 419, 557, 1663, 2269, 2609, 3547, 3943, 15761, 17477, 37243, 70481, 105557, 23913779, 84394837, 7057254647, 3915885721591, 4641244746324673, 5266511621347511, 565552908731370799
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
105557 is an element of this sequence because A103373(95) = 105557.
|
|
MATHEMATICA
|
k = 5; Do[a[n] = 1, {n, k + 1}]; a[n_] := a[n] = a[n - k] + a[n - k - 1]; Union[Select[Array[a, 350], PrimeQ]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|