R语言ggplot2绘图

    p <- ggplot(mpg, aes(class, hwy))
    p + geom_boxplot()  ###见图1
    
    # Orientation follows the discrete axis
    ggplot(mpg, aes(hwy, class)) + geom_boxplot()###坐标轴位置改变

    p + geom_boxplot(notch = TRUE)###进行修剪中位线处的尖角  见图2
    p + geom_boxplot(varwidth = TRUE)###箱型的宽度随该轴变量的数目改变   见图3
    p + geom_boxplot(fill = "white", colour = "#3366FF")####箱线内部填充为白色，外形颜色为"#3366FF"即蓝色  见图4
    p + geom_boxplot(outlier.colour = "red", outlier.shape = 1)###