rle                   package:base                   R Documentation

_R_u_n _L_e_n_g_t_h _E_n_c_o_d_i_n_g

_D_e_s_c_r_i_p_t_i_o_n:

     Compute the lengths and values of runs of equal values in a vector
     - or the reverse operation.

_U_s_a_g_e:

     rle(x)
     print(x, digits = getOption("digits"), ...)
     inverse.rle(x, ...)

_A_r_g_u_m_e_n_t_s:

       x: a simple vector for `rle()' or an object of class `"rle"' for
          `print()' or `inverse.rle()'.

digits, ...: potentially further arguments to the corresponding method.

_V_a_l_u_e:

     `rle()' returns an object of class `"rle"' which is a list with
     components 

 lengths: an integer vector containing the length of each run.

  values: a vector of the same length as `lengths' with the
          corresponding values.


     `inverse.rle()' is the inverse function of `rle()'.

_E_x_a_m_p_l_e_s:

     x <- rev(rep(6:10, 1:5))
     rle(x)
     ## lengths [1:5]  5 4 3 2 1
     ## values  [1:5] 10 9 8 7 6

     z <- c(TRUE,TRUE,FALSE,FALSE,TRUE,FALSE,TRUE,TRUE,TRUE)
     rle(z)
     rle(as.character(z))

     stopifnot(x == inverse.rle(rle(x)),
               z == inverse.rle(rle(z)))

