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