绘图询问

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

由程序

dat<-matrix(c(0.825,0.364,0.252,0.421,1.36,2.28,1.7,2.05,4.12,2.77,1.78,1.01), byrow=T, nrow=3)

colnames(dat) <- c("y","z","n","c")

rownames(dat) <- c("w","m","b")

barplot(dat, beside=T, col=c("blue","red","green"), legend = rownames(dat), ylim=c(0, 5))

可以绘制上图

我把数据保存成11.txt后（附件中），不知道怎么读取数据，来绘制图形，哪位高手可以帮忙一下，怎么读取数据来绘制下图

最好告诉程序，这样以后作图就不用一个输入了

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：程序

data=read.table("11.txt", header = T)
data=data.matrix(data)
barplot(data, beside=T, col=c("blue","red","green"),legend =rownames(data) , ylim=c(0, 5))

epoh 发表于 2012-11-14 15:40
data=read.table("11.txt", header = T)
data=data.matrix(data)
barplot(data, beside=T, col=c("blue", ...

那个混合模型的请您指教一下

epoh 发表于 2012-11-14 15:40
data=read.table("11.txt", header = T)
data=data.matrix(data)
barplot(data, beside=T, col=c("blue", ...

如何加标准差

xingzhaoh 发表于 2012-12-7 08:32
如何加标准差

dat<-matrix(c(0.825,0.364,0.252,0.421,1.36,2.28,1.7,2.05,4.12,2.77,1.78,1.01), byrow=T, nrow=3)
colnames(dat) <- c("y","z","n","c")
rownames(dat) <- c("w","m","b")
dat.sd<- apply(dat,2,sd)
d<- matrix(rep(dat.sd,3),byrow=T,nrow =3)
bp <- barplot(dat, beside = T, col=c("blue","red","green"), legend = rownames(dat), ylim=c(0, 6))
arrows(bp,dat, bp, dat+d,lwd = 1.5, angle =90, length =0.1)

呵呵，互相学习！

kaifengedu 发表于 2012-12-10 22:58
dat

非常感谢