# NOT RUN {
# returns mtcars
insist_rows(mtcars, maha_dist, within_n_mads(30), mpg:carb)
library(magrittr) # for piping operator
mtcars %>%
insist_rows(maha_dist, within_n_mads(10), vs:am)
# anything here will run
# }
# NOT RUN {
mtcars %>%
insist_rows(maha_dist, within_n_mads(1), everything())
# the assertion is untrue so
# nothing here will run
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab