R/formula-methods.R

In melt: Multiple Empirical Likelihood Tests

#' @describeIn LM Extracts the symbolic model formula used in [`el_lm()`] or
#'   [`el_glm()`].
#' @exportMethod formula
#' @usage NULL
setMethod("formula", "LM", function(x, ...) {
  formula(x@terms)
})