R/shift_post.R

In igutierrezm/ANOVABNPTestR: A Bayesian Nonparametric Factorial ANOVA

#' Return the shift functions
#'
#' @param fit An object of class anova_bnp_model.
#' @return A tibble with the following variables:
#' \itemize{
#'   \item group the group id.
#'   \item y the value of the response variable.
#'   \item the shift function evaluated at y, given the group.
#' }
#' @export
shift_post <- function(fit) {
  fit$shift_post
}