barplot画图求助

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

各位好：
有以下程序
names1<-c("1","2","3","4")
jihua<-c(10,50,20,50)
shiji<-c(40,90,100,110)
shuju<-rbind(jihua,shiji)
colnames(shuju)<-names1
barplot((shuju),beside=TRUE)

生成图形如下：


想在1对应的条形图黑色的正上方标注为10,灰色的正上方标注为40，
2对应的条形图黑色的正上方标注为50,灰色的正上方标注为90，
后面两个依次类推，怎么处理？
谢谢！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：barplot plot ARP bar Names 画图

已经有一种笨方法：
names1<-c("1","2","3","4")
jihua<-c(10,50,20,50)
shiji<-c(40,90,100,110)
shuju<-rbind(jihua,shiji)
colnames(shuju)<-names1
barplot((shuju),beside=TRUE,,ylim=c(0,120))
x=c(1.5,2.5,4.5,5.5,7.5,8.5,10.5,11.5)
y=c(10,40,50,90,20,100,50,110)
text(x,y+5,y)

差不多也就是这种办法了。

这一点没有excel好用，为什么R不多加一个参数来控制这个选项，

谢谢楼上两位！
还有一个问题是如何让他的legend出现在左上角。

添加参数，args.legend = list(x = "topleft")

吉林小王子 发表于 2012-3-8 15:37
添加参数，args.legend = list(x = "topleft")

多谢，已经成功!

吉林小王子 发表于 2012-3-8 15:37
添加参数，args.legend = list(x = "topleft")

您好！
如何让一幅图的图例出现在这幅图的正下方（坐标轴的下方）
如果使用args.legend=list(x="bottom")则会出现下图所示的情况

您好！
如何让一幅图的图例出现在这幅图的正下方（坐标轴的下方）
如果使用args.legend=list(x="bottom")则会出现下图（1.png）所示的情况