23 14
Drug3 9 18
Drug4 15 6
#读入数据
data = read.table("barplot.txt",header=T)
#绘制条形图,仔细喊下面没一行代码都生成一个图,看他们的差别会知道参数是干嘛的...为不同的组设置不同的颜色
barplot(data[,2],names.arg = data[,1],main="条形图",xlab="分组",ylab="统计量",col=c("grey","red"...多种分组的柱状图:堆积柱状图
#转换数据
data2 = t(data[,c(2,3)])
#绘制柱状图
barplot(as.matrix(data2))
?...多种分组的柱状图:非堆积柱状图
#非堆积柱状图
barplot(as.matrix(data2),
names.arg = data[,1],main="条形图",xlab="分组",ylab...修改柱子颜色,正负值用不同的颜色
#positive and negative values with different color
csub$positive <- csub$Anomaly10y