if (FALSE) {
library(inti)
fb <- potato
fb %>%
plot_raw(type = "box"
, x = "geno"
, y = "twue"
#, group = "treat"
, ylab = NULL
, xlab = NULL
, glab = ""
)
fb %>%
plot_raw(type = "sca"
, x = "hi"
, y = "twue"
, group = "geno"
)
}
Run the code above in your browser using DataLab