OFFSET
1,2
COMMENTS
Numbers k such that k | A002203(k).
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..327
EXAMPLE
MATHEMATICA
Select[Range[50000], Divisible[LucasL[#, 2], #] &]
PROG
(PARI) lista(kmax) = {my(p1 = 2, p2 = 6, p3); print1("1, 2, "); for(k = 3, kmax, p3 = p1 + 2*p2; if(!(p3 % k), print1(k, ", ")); p1 = p2; p2 = p3); }
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, May 16 2024
STATUS
approved