# NOT RUN {
# for reproducibility
set.seed(123)
library(tidyBF)
# ------------------ association tests --------------------------------
# to get caption (in favor of null)
bf_contingency_tab(
data = mtcars,
x = am,
y = cyl,
fixed.margin = "cols"
)
# to see results
bf_contingency_tab(
data = mtcars,
x = am,
y = cyl,
sampling.plan = "jointMulti",
fixed.margin = "rows",
prior.concentration = 1
)
# ------------------ goodness of fit tests --------------------------------
bf_contingency_tab(
data = mtcars,
x = am,
prior.concentration = 10
)
# }
Run the code above in your browser using DataLab