--原文链接--
image.png
image.png
image.png
image.png
library(lemon)
data(diamonds)
ggplot(diamonds, aes(x=cut, y=price,color=clarity)) +
geom_point(position=position_jitter(width=0.2),size=0.2) +
coord_flex_cart(bottom=brackets_horisontal(), left=capped_vertical('both')) +
scale_color_manual(values=palette("Set1"))+
scale_y_continuous(limits=c(0,20000))+
theme_light() +
theme(panel.border=element_blank(), axis.line = element_line())
image.png
精彩推荐：
R语言绘制散点图geom_point
R语言添加拟合曲线geom_smooth
R语言箱线图boxplot
R语言线图geom_line
image.png
