

unique {base}                                R Documentation

_E_x_t_r_a_c_t _U_n_i_q_u_e _E_l_e_m_e_n_t_s

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

     `unique' returns a vector like `x' but with duplicate
     elements removed.  If an element is equal to one with a
     smaller index, it is removed.

_U_s_a_g_e_:

     unique(x)

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

       x: an atomic vector

_S_e_e _A_l_s_o_:

     `duplicated' which gives the indices of duplicated ele-
     ments.

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

     unique(c(3:5, 11:8, 8 + 0:5))
     length(unique(sample(100,100,replace=T)))# ~= 100(1 - 1/e) = 63.21
     my.unique <- function(x) x[!duplicated(x)]
     for(i in 1:4)
      { x <- rpois(100, pi); print(all(unique(x) == my.unique(x))) }

