parampositions         package:RandomFields         R Documentation

_P_o_s_i_t_i_o_n _o_f _t_h_e _p_a_r_a_m_e_t_e_r_s

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

     The function returns the internal positions of the model
     parameters

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

       parampositions(model, param, print=TRUE)

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

   model: see 'CovarianceFct'

   param: see 'CovarianceFct'

   print: if 'FALSE' only an invisible list is returned

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

     The model is printed and returned where the values of the
     parameters are the positions in the internal representation.

     An error appears if the model can be substantially simplified.

_A_u_t_h_o_r(_s):

     Martin Schlather, martin.schlather@cu.lu <URL:
     http://www.cu.lu/~schlathe>

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

     'CovarianceFct', 'mleRF'

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

     parampositions(model="exp", param=c(0,1,0,NA))
     ## that is, the nugget in the standard model is removed if naught!
     ## the values of the other parameters do not matter.

     parampositions(model="exp", param=c(0,1,NA,NA)) 
     parampositions(model="exp", param=c(0,0,1,NA)) 

     parampositions(model="whi", param=cbind(c(1, 1, 1), c(2, 2, 2)))
     parampositions(model="whi", param=cbind(c(1, 1, 1), c(2, 0, 2)))
     ## second lines, second column defines a nugget effect since scale is 0!

     try(parampositions(model="whi", param=cbind(c(1, 1, 1), c(0, 0, 0))))
     ## leads to an error

     try(parampositions(model="whi",
                        param=cbind(c(1, 1, 1), c(2, 0, 0), c(1, 0, 0)))) 
     ## leads to an error

     try(parampositions(model="whi",
                        param=cbind(c(1, 1, 1), c(NA, 0, 0), c(1, 0, 0))))
     ## leads to an error

     parampositions(model=list(list(model="exp", var=3, scale=6), "+",
                                list(model="whittle", var=2, scale=7,
                                     kappa=NA))) ## again the values do not matter
      

