login
Greatest number such that in table A200741 the first terms in row n coincide with row n+1.
3

%I #8 Jul 13 2013 12:04:19

%S 1,2,4,10,7,35,33,36,31,82,17,81,78,170,55,132,28,195,247,313,439,325,

%T 415,498,376,213,161,693,608,948,739,557,831,1007,1252,631,1156,1370,

%U 148,579,1023,1755,1677,1239,1638,1839,2281,2401,1963,2630,2521,2951

%N Greatest number such that in table A200741 the first terms in row n coincide with row n+1.

%C Shorter rows in A200741 are contained in longer rows; a(n) gives length of common initial segments of consecutive rows: A200741(n,k) = A200741(n+1,k) for k <= a(n).

%H Reinhard Zumkeller, <a href="/A200742/b200742.txt">Table of n, a(n) for n = 1..100</a>

%o (Haskell)

%o a200742 n = a200742_list !! (n-1)

%o a200742_list = f a200741_tabl where

%o f (rs:rss'@(rs':rss)) =

%o (length $ takeWhile (== EQ) $ zipWith compare rs rs') : f rss'

%Y Cf. A200738.

%K nonn

%O 1,2

%A _Reinhard Zumkeller_, Nov 21 2011