# Small function to display plots only if it's interactive
p_ <- GGally::print_if_interactive
data(tips)
p_(ggally_box(tips, mapping = ggplot2::aes(x = total_bill, y = sex)))
p_(ggally_box(
tips,
mapping = ggplot2::aes(sex, total_bill, color = sex),
outlier.colour = "red",
outlier.shape = 13,
outlier.size = 8
))
Run the code above in your browser using DataLab