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 A160757 #4 Mar 31 2012 10:31:25 %S A160757 1,1,5058,262213938,18124577012898,187952389930860, %T A160757 1409394295257361938,116903055445824294157698, %U A160757 10100618828005365858877129458,81435914480042681825934186407384633298,7505278652741640947693896415563573183203138,700346071081054203480884565881868806176873272498 %N A160757 Averages of the Fibonacci numbers which take integer values. %C A160757 The numbers n such that F(1)+F(2)+...+F(n)=F(n+2)-1 is divisible by n are given in A111035. [From _Max Alekseyev_, Jun 04 2009] %F A160757 1/n*Sum {j=1..n} Fibonacci_j is an integer. %F A160757 a(n) = (A000045(A111035(n)+2)-1) / A111035(n) = A000071(A111035(n)+2) / A111035(n) [From _Max Alekseyev_, Jun 04 2009] %t A160757 lst = {}; Do[a = Sum[ Fibonacci@ j, {j, n}]/n; If[ IntegerQ@ a, AppendTo[lst, a]], {n, 250}]; lst %Y A160757 Cf. A050248, integer average of n primes for some n, A000045. %K A160757 easy,nonn %O A160757 1,3 %A A160757 _Daniel Tisdale_, May 25 2009 %E A160757 Corrected and extended by _Max Alekseyev_ and _Robert G. Wilson v_, Jun 04 2009