A251548 Lengths of runs of identical terms in A251546.

1, 2, 6, 6, 15, 2, 6, 2, 7, 8, 13, 2, 2, 7, 2, 13, 2, 5, 2, 6, 5, 2, 11, 5, 2, 8, 2, 2, 2, 5, 5, 2, 15, 2, 2, 2, 4, 2, 2, 2, 13, 2, 2, 2, 5, 7, 2, 4, 2, 8, 2, 2, 2, 3, 4, 8, 2, 2, 2, 2, 2, 14, 2, 2, 2, 2, 10, 2, 2, 2, 2

Offset

1,2

Links

Chai Wah Wu, Table of n, a(n) for n = 1..10000

Prog

(Haskell)
import Data.List (group)
a251548 n = a251548_list !! (n-1)
a251548_list = map length $ group $ map a251546 [1..]
-- Reinhard Zumkeller, Dec 19 2014

Crossrefs

Cf. A098550, A247253, A251416, A251417, A251546-A251552.

Sequence in context: A321302 A294735 A367072 * A316785 A056136 A349288

Adjacent sequences: A251545 A251546 A251547 * A251549 A251550 A251551

Keyword

nonn

Author

N. J. A. Sloane, Dec 18 2014

Status

approved