df <- data.frame(a = 1:10, b = 2:11, c = c(1, 8, 3, 7, 8, 2, 4, 1, 4, 5))
test_corr <- cor.test(df$a, df$b)
test_corr2 <- cor.test(df$a, df$c)
test_easycorr <- correlation::correlation(df, select = "a", select2 = "c")
test_easycorr2 <- correlation::correlation(df, select = "a", select2 = "c", method = "spearman")
test_easycorr3 <- correlation::correlation(df, select = "a", select2 = "c", method = "kendall")
test_ttest1 <- t.test(df$a, mu = 5)
test_ttest <- t.test(df$a, df$b)
test_ttest2 <- t.test(df$a, c(df$b, 120))
test_ttest3 <- suppressWarnings(wilcox.test(df$a, mu = 5))
test_ttest4 <- suppressWarnings(wilcox.test(df$a, df$b))
test_ttest5 <- suppressWarnings(wilcox.test(df$a, c(df$b, 120)))
test_chisq <- chisq.test(as.table(rbind(c(762, 327, 468), c(484, 239, 477))))
test_bf <- BayesFactor::ttestBF(df$a, mu = 5)