cor(data.frame, method=c("pearson", "kendall", "spearman"))
cor.test(data$acol, data$bcol, method=c("pearson", "kendall", "spearman"))

data("mtcars")
my_data <- mtcars[, c(1,3,4,5,6,7)]
head(my_data)

library("Hmisc")
rcorr(x, type = c("pearson","spearman"))

rcorr(my_data)