This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A247240 #28 Feb 15 2020 00:18:00 %S A247240 2,7,35,245,485,12914 %N 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. %C A247240 Next term > 20000. - _Jinyuan Wang_, Feb 14 2020 %t A247240 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 *) %Y A247240 Cf. A059248, A250744. %K A247240 nonn,more %O A247240 1,1 %A A247240 _Michel Marcus_, Nov 28 2014 %E A247240 a(6) from _Jinyuan Wang_, Feb 14 2020