## ----include = FALSE---------------------------------------------------------- knitr::opts_chunk$set( collapse = TRUE, comment = "#>" ) ## ----setup-------------------------------------------------------------------- library(peppwR) ## ----eval=FALSE--------------------------------------------------------------- # df_path <- system.file("raw_data.csv", package="peppwr") # df <- readr::read_csv(df_path) # # fits_df <- find_fits(df, id_col="pep_id", group_col="group", value_col="value") ## ----eval=FALSE--------------------------------------------------------------- # evaldist(fits_df)