getRNG                package:setRNG                R Documentation

_g_e_t _t_h_e _R_N_D _a_n_d _s_e_e_d _f_r_o_m _a_n _o_b_j_e_c_t

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

     Get the random number generator and seed used to generate an
     object.

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

         getRNG(e=NULL)
         ## Default S3 method:
         getRNG(e=NULL)

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

       e: an object generated by simulation (which stored the RNG 
          information).

_D_e_t_a_i_l_s:

     Extract the RNG information used to generate the object. If 'e' is
     'NULL' then 'getRNG' returns the RNG setting, as  returned by
     'setRNG()'. Otherwise, the default method assumes the object is a
     list and the RNG information  is in the element 'rng' or
     'noise\$rng'.

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

     The random seed and other random number generation information
     used to generate the object.

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

     'setRNG', '.Random.seed'

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

     ## Not run: 
     if (require("dse1")) {
       if(is.R()) data("eg1.DSE.data.diff", package="dse1")
       model <- estVARXls(eg1.DSE.data.diff)
       sim <- simulate(model)
       getRNG(sim)
       }
     ## End(Not run)

