# NOT RUN {
design(iris, 'cor') %>%
add_settings() %>%
add_variables('xvars', c('Sepal.Length', 'Sepal.Width')) %>%
construct()
design(iris, 't.test') %>%
add_settings() %>%
add_variables('yvars', c('Sepal.Length', 'Sepal.Width')) %>%
add_variables('xvars', c('Petal.Length', 'Petal.Width')) %>%
construct()
design(iris, 'glm') %>%
add_settings() %>%
add_variables('yvars', c('Sepal.Length', 'Sepal.Width')) %>%
add_variables('xvars', c('Petal.Length', 'Petal.Width')) %>%
construct()
design(iris, 'gee') %>%
add_settings('Species') %>%
add_variables('yvars', c('Sepal.Length', 'Sepal.Width')) %>%
add_variables('xvars', c('Petal.Length', 'Petal.Width')) %>%
construct()
design(iris, 'pls') %>%
add_settings() %>%
add_variables('yvars', c('Sepal.Length', 'Sepal.Width')) %>%
add_variables('xvars', c('Petal.Length', 'Petal.Width')) %>%
construct()
# }
Run the code above in your browser using DataLab