if (FALSE) { # requireNamespace("BayesFactor", quietly = TRUE)
# \donttest{
library(BayesFactor)
rez <- BayesFactor::ttestBF(iris$Sepal.Width, iris$Sepal.Length)
report_statistics(rez, exact = TRUE) # Print exact BF
report(rez, h0 = "the null hypothesis", h1 = "the alternative")
rez <- BayesFactor::correlationBF(iris$Sepal.Width, iris$Sepal.Length)
report(rez)
# }
}
Run the code above in your browser using DataLab