|
|
A105764
|
|
Indices of prime Lucas 5-step numbers, A074048.
|
|
2
|
|
|
2, 3, 5, 7, 8, 9, 10, 13, 30, 35, 77, 98, 126, 160, 192, 810, 1086, 1999, 2021, 3157, 3426, 3471, 15066, 24115, 29782, 29941
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
No other n < 30000.
|
|
LINKS
|
|
|
MATHEMATICA
|
a={-1, -1, -1, -1, 5}; lst={}; Do[s=Plus@@a; a=RotateLeft[a]; a[[ -1]]=s; If[PrimeQ[s], AppendTo[lst, n]], {n, 30000}]; lst
|
|
CROSSREFS
|
Cf. A105765 (prime Lucas 5-step numbers).
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|