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 A200738 #8 Jul 13 2013 12:04:19 %S A200738 1,2,4,6,8,11,14,16,20,23,26,31,35,38,43,48,51,57,63,65,72,78,83,89, %T A200738 94,100,107,113,118,126,133,137,146,153,158,167,175,180,190,197,203, %U A200738 213,221,227,234,245,253,262,271,276,288,296,304,316,323,329,342,354 %N A200738 Greatest number such that in the triangle A200737 the first terms in row n coincide with row n+1. %C A200738 Shorter rows in A200737 are contained in longer rows; a(n) gives length of common initial segments of consecutive rows: A200737(n,k) = A200737(n+1,k) for k <= a(n). %H A200738 Reinhard Zumkeller, <a href="/A200738/b200738.txt">Table of n, a(n) for n = 1..100</a> %o A200738 (Haskell) %o A200738 a200738 n = a200738_list !! (n-1) %o A200738 a200738_list = f a200737_tabl where %o A200738 f (rs:rss'@(rs':rss)) = %o A200738 (length $ takeWhile (== EQ) $ zipWith compare rs rs') : f rss' %Y A200738 Cf. A200742. %K A200738 nonn %O A200738 1,2 %A A200738 _Reinhard Zumkeller_, Nov 21 2011