Index of Lucas numbers not containing the number 1.
0, 2, 3, 4, 7, 8, 9, 12, 14, 16, 18, 19, 21, 22, 23, 27, 32, 35, 36, 38, 42, 43, 45, 47, 71, 76, 78, 84, 90, 131, 143, 146, 203
1
This sequence is probably complete.
T. D. Noe, Plot of 33 terms
(Mma) t = {}; Do[d = IntegerDigits[LucasL[n]]; If[! MemberQ[d, 1], AppendTo[t, n]], {n, 0, 1000}]; t
nonn,base
T. D. Noe, Aug 27 2014