Part4.簇状柱形图
原始数据的格式如下
## 大学类型 性别 评分 ## 1 国家985 男 78.5 ## 2 国家211 男 72.1 ## 3 普通一本 男 70.4 ## 4 二本院校 男 65.4 ## 5 三本院校 男 63.3 ## 6 国家985 女 76.0 ## 7 国家211 女 61.7 ## 8 普通一本 女 68.1 ## 9 二本院校 女 68.6 ## 10 三本院校 女 58.7
下图是通过Excel绘制的簇状柱形图,现在使用R的
ggplot2
包来完成相同的任务。
setwd('d:/data_visual/data;)
library(ggplot2)
data_04<-read.csv(file = '04簇状柱形图.csv',header = TRUE)
ggplot(data_04,aes(x=大学类型,y=评分,fill=性别))+ geom_bar(position="dodge",stat="identity")+ ggtitle('不同学校类型,不同性别的学生自我评价平均水平')+ geom_text(aes(label=评分),vjust=1.5,position=position_dodge),size=3)+ #簇状条形图需要设定position参数来调节数据标签的位置,否则数据标签显示不正常 scale_x_discrete(limits=c("三本院校","二本院校","普通一本","国家211","国家985"))