

Kenvl(spatial)                               R Documentation

_C_o_m_p_u_t_e _E_n_v_e_l_o_p_e _a_n_d _A_v_e_r_a_g_e _o_f _S_i_m_u_l_a_t_i_o_n_s _o_f _K_-_f_n_s

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

     Computes envelope (upper and lower limits) and average
     of simulations of K-fns

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

     Kenvl(fs, nsim, ...)

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

      fs: full scale for K-fn

    nsim: number of simulations

     ...: arguments to produce one simulation

_V_a_l_u_e_:

     list with components

       x: distances

   lower: min of K-fns

   upper: max of K-fns

    aver: average of K-fns

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

     `Kfn', `Kaver'

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

     towns <- ppinit("towns.dat")
     par(pty="s")
     plot(Kfn(towns, 40), type="b")
     plot(Kfn(towns, 10), type="b", xlab="distance", ylab="L(t)")
     for(i in 1:10) lines(Kfn(Psim(69), 10))
     lims <- Kenvl(10,100,Psim(69))
     lines(lims$x,lims$l, lty=2, col="green")
     lines(lims$x,lims$u, lty=2, col="green")
     lines(Kaver(10,25,Strauss(69,0.5,3.5)), col="red")

