library(productplots)
data(happy)
happy1 <- mutate(happy,`marital status` = marital)
prodplot(happy1, ~ health + marital)
prodplot(happy1,~ health + `marital status`)
prodplot(happy1,~ health + `marital status`,c("vspine","hspine"))
prodplot(happy1, ~ health + sex + marital,c("vspine","hspine","hspine"))
prodplot(happy1, ~ health + sex + `marital status`,c("vspine","hspine","hspine"))
Error in `[.data.frame`(labels, x, col) : undefined columns selected