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 = environment(fun)) <- 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 object, usually a language object: see section 'Value'.

_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.

     To set the value to a list call the replacement function with
     'value' a length-one list containing the desired value.

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

     'body' returns the body of the function specified.  This is
     normally a language object, most often a call to '{', but it can
     also be an object (e.g. 'pi') to be the return value of the
     function.

     The replacement form sets the body of a function to the object on
     the right hand side, and (potentially) resets the environment of
     the function.  If 'value' is of class '"expression"' or a
     length-one list, the first element is used as the body.  For
     expressions (but not lists) any additional elements are ignored,
     with a warning.

_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)

