# NOT RUN {
df <- createDataFrame(cbind(model = rownames(mtcars), mtcars))
head(select(df, cov(df$mpg, df$hp), cov("mpg", "hp"),
covar_samp(df$mpg, df$hp), covar_samp("mpg", "hp"),
covar_pop(df$mpg, df$hp), covar_pop("mpg", "hp")))
# }
# NOT RUN {
# }
# NOT RUN {
cov(df, "mpg", "hp")
cov(df, df$mpg, df$hp)
# }
Run the code above in your browser using DataLab