cp's OEIS Frontend

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.

A200738 Greatest number such that in the triangle A200737 the first terms in row n coincide with row n+1.

This page as a plain text file.
%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