第三期任务作业 R-019 柱形图堆积柱形图

yxldoc 2017-07-25 12:30:52 阅读: 1168

作业1：柱状图

x<-c(1,2,3,4,5,6)

y<-c(7,12,5,20,16,10)

barplot(y,xlab='月份',ylab='营业额',main='某销售公司上半年的营业额',col='blue',border='red',names.arg=x)

柱状图_1.png

作业二：

M <- c("一月", "二月", "三月", "四月", "五月", "六月")

一部 <- c(2,4,1,6,5,2)

二部<- c(2,5,2,7,6,2)

三部<- c(3,3,1,7,5,6)

barplot(rbind(一部,二部,三部),names.arg = M, xlab = "月份",ylab = "收入",main = "某销售公司上半年的营业额以及总营业额",

col = c("yellow","green", "red"))

legend("topleft",c("一部","二部","三部"),fill = c("yellow","green", "red"))

图2_新.png

邀请讨论

{{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}})

删除

回复关闭