|
|
A247240
|
|
Numbers such that A059248(k), the numerator of Sum_{i=1..k} 1/Fibonacci(i), is not equal to A250744(k), the denominator of the harmonic mean of the first k positive Fibonacci numbers.
|
|
0
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
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
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|