container-class           package:Biobase           R Documentation

_c_o_n_t_a_i_n_e_r: _a _c_l_a_s_s _t_h_a_t _s_p_e_c_i_a_l_i_z_e_s _t_h_e _l_i_s_t _c_o_n_s_t_r_u_c_t _o_f _R
_t_o _p_r_o_v_i_d_e _c_o_n_t_e_n_t _a_n_d _a_c_c_e_s_s _c_o_n_t_r_o_l

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

     A lockable list structure with constraints on content.

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

      #new('container', x=[list], content=[character], locked=[logical] )

_S_l_o_t_s:

_x [class: list] list of entities that are guaranteed to share a certain
     property

_c_o_n_t_e_n_t [class: character] tag describing container contents 

_l_o_c_k_e_d [class: logical] boolean indicator of locked status.
     locked==TRUE implies assignments into the container are not
     permitted 

_M_e_t_h_o_d_s:

'_c_o_n_t_e_n_t' returns 'content' slot of argument

'_l_o_c_k_e_d' returns 'locked' slot of argument

'_s_h_o_w' prints container

'[['(_r_e_p_l_a_c_e) replace elements in the container 

'[['(_a_c_c_e_s_s) access elements in a container

'['(_a_c_c_e_s_s) make a subset of a container (which will itself be a
     container)

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

       x1 <- new("container", x=vector("list", length=3), content="lm")
       lm1 <- lm(rnorm(10)~runif(10))
       x1[[1]] <- lm1
      

