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 A070924 #2 Mar 30 2012 17:30:44
%S A070924 1,2,4,5,9,10,17,18,21,34,37,41,42,69,73,74,82,85,138,146,149,165,169,
%T A070924 170,277,293,297,298,330,341,553,554,585,586,594,597,661,677,681,682,
%U A070924 1109,1173,1189,1193,1194,1322,1354,1365,2217,2218,2345,2346,2378,2389
%N A070924 Where A070871 sets a new record.
%e A070924 In A070871 a visual inspection will show that A070871(10) = 15 and 15 exceeds all A070871(k) for all k's less than 10.
%t A070924 a[0] = 1; a[n_] := a[n] = If[ OddQ[n], a[n/2 - 1/2], a[n/2] + a[n/2 - 1]]; m = 0; Do[ If[ a[n]*a[n - 1] > m, m = a[n]*a[n - 1]; Print[n]], {n, 1, 10^4}]
%Y A070924 Cf. A070871, A070926.
%K A070924 nonn
%O A070924 1,2
%A A070924 _Robert G. Wilson v_, May 20 2002