r语言liftchart_R语言作图——Lollipop chart

原创：黄小仙

今天给大家分享的是Lollipop chart(棒棒糖图)的画法。棒棒糖图的用途跟条形图的用法类似，只是看起来更加美观一些，图表形式更加丰富(数据不够、拿图来凑，啥也不能阻止我优秀)。

为了跟之前画的柱状图更好的比较，今天画图使用了相同的数据。

作图思路：棒棒糖图实际上是在散点图的基础上增加了辅助线。

不过在作图过程中还是遇到了和之前一样的问题，数据是按照销量从高到低排列，但是画出的图却是按照字母顺序排列，需要用reorder()函数对因子进行排序。

具体的作图过程如下。

Step1. 绘图数据的准备

首先还是要把你想要绘图的数据调整成R语言可以识别的格式，在excel中保存成csv格式。

数据的格式如下图：一列表示一种变量，第一行是列名

Step2. 绘图数据的读取

data

Step3.绘图所需package的调用

library(ggplot2)

Step4.因子水平排序

data$书名

data$书名" />

Step5.绘图

p

geom_line()+geom_segment(aes(x=书名,xend=书名,y=0,yend=销量))+

theme(axis.text.x = element_text(angle = 45, hjust = 0.8, vjust = 0.9))+

xlab("销量排行前十")+theme(legend.position="none")+

scale_y_continuous("销量",breaks = c(0,200000,400000,600000),labels = c("0","200000","400000","600000"))

p

有强迫症的同学看这个图可能有一些不爽，首先就是图片不高清，其次就是辅助线和数据点的相对位置略微奇怪。

不要慌，不要慌，导出高清图的方法在这里R语言作图——导出高清图​mp.weixin.qq.com

更改图层相对位置只要把代码中geom_piont()和geom_line()+geom_segment()语句的顺序调换一下就好啦。

好啦，今天的分享就到这里了，希望可以帮助到大家。有什么新的作图要求，可以留言给我哦！

小仙会的都在这里：

(公众号：生信了)