R2-17 第四期-ggplot2画饼图/箱型

四幺1111 2017-11-28 21:19:21 阅读: 800

任务一

mydata<-read.csv(file="F:\\R学习作业\\20171128\\R.4-1.csv")

library(ggplot2)

mydata<-data.frame(city=c("A","B","C","D","E"),value=c("20","18","16","14","12"))

ggplot(mydata,aes(x="",y=value,fill=city))+

geom_bar(stat="identity",width=1)+

coord_polar(theta="y")+

labs(x="city",y="value")+

ggtitle("R2-17")+

theme(legend.title=element_blank(),legend.position="top")+

theme(axis.ticks=element_blank())

任务二

data(singer,package="lattice")

library(ggplot2)

ggplot(singer,aes(x=voice.part,y=height,fill=voice.part))+

geom_boxplot()+

theme(legend.title=element_blank(),legend.position="top")+

ggtitle("R2-17")

邀请讨论

{{f.title}} 大小 {{f.file_size}} 下载 {{f.count_download}} 金币 {{f.count_gold}}

切换到完整评论

受邀请回答

{{f.title}} 大小 {{f.file_size}} 下载 {{f.count_download}} 金币 {{f.count_gold}}

切换到完整回复

发送回复

赞({{item.count_zan}})

踩({{item.count_cai}})

删除

回复关闭