R/methods_PMCMRplus.R

In parameters: Processing of Model Parameters

#' @export
model_parameters.PMCMR <- function(model, ...) {
  insight::check_if_installed("PMCMRplus")
  parameters <- PMCMRplus::toTidy(model)

  names(parameters) <- c(
    "Group1", "Group2", "Statistic", "p", "alternative", "Method",
    "Distribution", "p_adjustment"
  )

  parameters <- .add_htest_parameters_attributes(parameters, model)

  class(parameters) <- c("parameters_model", "see_parameters_model", class(parameters))
  parameters
}


#' @export
model_parameters.osrt <- model_parameters.PMCMR


#' @export
model_parameters.trendPMCMR <- model_parameters.PMCMR