body                  package:base                  R Documentation

_A_c_c_e_s_s _t_o _a_n_d _M_a_n_i_p_u_l_a_t_i_o_n _o_f _t_h_e _B_o_d_y _o_f _a _F_u_n_c_t_i_o_n

_D_e_s_c_r_i_p_t_i_o_n:

     Get or set the body of a function.

_U_s_a_g_e:

     body(fun = sys.function(sys.parent()))
     body(fun, envir = parent.frame()) <- value

_A_r_g_u_m_e_n_t_s:

     fun: a function object, or see Details.

   envir: environment in which the function should be defined.

   value: an expression or a list of R expressions.

_D_e_t_a_i_l_s:

     For the first form, 'fun' can be a character string naming the
     function to be manipulated, which is searched for from the parent
     environment. If it is not specified, the function calling 'body'
     is used.

_V_a_l_u_e:

     'body' returns the body of the function specified.

     The replacement form sets the body of a function to the list on
     the right hand side.

_N_o_t_e:

     For ancient historical reasons, 'envir = NULL' uses the global
     environment rather than the base environment.   Please use 'envir
     = globalenv()' instead if this is what you want, as the special
     handling of 'NULL' may change in a future release.

_S_e_e _A_l_s_o:

     'alist', 'args', 'function'.

_E_x_a_m_p_l_e_s:

     body(body)
     f <- function(x) x^5
     body(f) <- expression(5^x)
     ## or equivalently  body(f) <- list(quote(5^x))
     f(3) # = 125
     body(f)

