登录
首页精彩阅读R语言数据可视化2—ggplot2各种维度的业务量统计根据类型统计不同月份的业务
R语言数据可视化2—ggplot2各种维度的业务量统计根据类型统计不同月份的业务
2017-06-11
收藏

R语言数据可视化2—ggplot2各种维度的业务量统计根据类型统计不同月份的业务

准备工作:

1.案例所用的表“test1.csv”

2.所用到的R包"ggplot2"、"lubridate"

ggplot2介绍:用来作图

lubridate介绍:用来提取日期中月份元素

实战部分开始

案例一目的:根据“开始时间”字段统计“类型”的业务量

> test<-read.csv("test1.csv",header=TRUE)
> names(test)
[1] "省份"     "类型"     "开始时间"
> library(ggplot2)
> library(lubridate)
> ##根据月份统计类型的业务量
> ggplot(test,aes(x=month(开始时间),fill=类型))+
      geom_bar(position = "dodge")

案例二目的:根据类型统计不同月份的业务量

>##根据类型统计不同月份的业务量> test$类型<-factor(test$类型,levels = c("一级","二级","三级")) ##将X轴排序> ggplot(test,aes(x=类型,fill=factor(month(开始时间))))+ ##不指定Y轴意思是求记录数geom_bar(position="dodge")+ ##dodge表示并排柱子guides(fill=guide_legend(title ="月份")) ##更改图例标题名称


案例三目的:省公司业务量按月份同比统计

>##省公司业务量按月份同比统计> ggplot(test,aes(x=省份,fill=factor(month(开始时间))))+geom_bar(position="dodge")+guides(fill=guide_legend(title ="月份"))

案例四目的:按省份业务量统计降序排列

>##按省份业务量统计降序排列>long<-aggregate(省份~factor(省份),test,length)> names(long)<-c("省份","业务量") ##重命名数据集列名> ggplot(long,aes(省份,业务量,fill=业务量))+geom_bar(position="dodge",stat ="identity")

结束!!!

数据分析咨询请扫描二维码

客服在线
立即咨询