OFFSET
1,1
COMMENTS
Next term > 20000. - Jinyuan Wang, Feb 14 2020
MATHEMATICA
s=0; lst={}; Do[s+=1/Fibonacci[n]; If[Numerator[s]!=Denominator[n/s], AppendTo[lst, n]], {n, 10000}]; lst (* Jinyuan Wang, Feb 14 2020 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Michel Marcus, Nov 28 2014
EXTENSIONS
a(6) from Jinyuan Wang, Feb 14 2020
STATUS
approved