Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A258383
Run lengths of consecutive identical terms in A062234.
9
2, 2, 2, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 2, 1, 1, 1, 1
OFFSET
1,1
COMMENTS
a(A258437(n)) = n and a(m) != n for m < A258437(n).
LINKS
EXAMPLE
See A258432.
PROG
(Haskell)
import Data.List (group)
a258383 n = a258383_list !! (n-1)
a258383_list = map length $ group a062234_list
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, May 31 2015
STATUS
approved