SSasympOrig              package:stats              R Documentation

_A_s_y_m_p_t_o_t_i_c _R_e_g_r_e_s_s_i_o_n _M_o_d_e_l _t_h_r_o_u_g_h _t_h_e _O_r_i_g_i_n

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

     This 'selfStart' model evaluates the asymptotic regression
     function through the origin and its gradient.  It has an 'initial'
     attribute that will evaluate initial estimates of the parameters
     'Asym' and 'lrc' for a given set of data.

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

     SSasympOrig(input, Asym, lrc)

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

   input: a numeric vector of values at which to evaluate the model.

    Asym: a numeric parameter representing the horizontal asymptote.

     lrc: a numeric parameter representing the natural logarithm of the
          rate constant.

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

     a numeric vector of the same length as 'input'.  It is the value
     of the expression 'Asym*(1 - exp(-exp(lrc)*input))'.  If all of
     the arguments 'Asym' and 'lrc' are names of objects, the gradient
     matrix with respect to these names is attached as an attribute
     named 'gradient'.

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

     Jose Pinheiro and Douglas Bates

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

     'nls', 'selfStart'

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

     data( Loblolly )
     Lob.329 <- Loblolly[ Loblolly$Seed == "329", ]
     SSasympOrig( Lob.329$age, 100, -3.2 )  # response only
     Asym <- 100; lrc <- -3.2
     SSasympOrig( Lob.329$age, Asym, lrc ) # response and gradient
     getInitial(height ~ SSasympOrig(age, Asym, lrc), data = Lob.329)
     ## Initial values are in fact the converged values
     fm1 <- nls(height ~ SSasympOrig( age, Asym, lrc), data = Lob.329)
     summary(fm1)

