OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
MATHEMATICA
b:= Complement[Range[1, 100], LucasL[Range[20]]]; Join[{3, 5, 8}, Table[LucasL[n+4] - b[[n]], {n, 2, 35}]] (* G. C. Greubel, Jun 19 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Missing a(30) inserted and more terms from Sean A. Irvine, Oct 17 2018
STATUS
approved