想做堆砌的柱状图，怎么设置数据格式及程序代码呀？

mymei 发表于 2014-7-28 17:02
试试barplot(t(counts))

还是不出来，难道是导入的数据格式不对，或者生成的矩阵不对？

我导入你的数据，用以下命令已经出来图了。
barplot(t(counts),col=c("red","yellow","green"))

mymei 发表于 2014-7-28 17:11
我导入你的数据，用以下命令已经出来图了。
barplot(t(counts),col=c("red","yellow","green"))

高手呀，就是这个图：），咋弄的呢，能让我看看你的txt或者csv格式吗，以及你整个代码，我好好学习一下！！！！！

qianhk 发表于 2014-7-28 17:20
高手呀，就是这个图：），咋弄的呢，能让我看看你的txt或者csv格式吗，以及你整个代码，我好好学习一下！ ...

test.txt (2.7 KB)

2014-7-28 17:21:54 上传

temp <- read.table("test.txt",header=F)
counts <- as.matrix(temp)

qianhk 发表于 2014-7-28 17:20
高手呀，就是这个图：），咋弄的呢，能让我看看你的txt或者csv格式吗，以及你整个代码，我好好学习一下！ ...

我看了你的barplot代码，高手t（counts），这个t命令是啥意思？！问题就处在这个t上了


帮助文件里没有这个命令呀
barplot(height, width = 1, space = NULL,
        names.arg = NULL, legend.text = NULL, beside = FALSE,
        horiz = FALSE, density = NULL, angle = 45,
        col = NULL, border = par("fg"),
        main = NULL, sub = NULL, xlab = NULL, ylab = NULL,
        xlim = NULL, ylim = NULL, xpd = TRUE, log = "",
        axes = TRUE, axisnames = TRUE,
        cex.axis = par("cex.axis"), cex.names = par("cex.axis"),
        inside = TRUE, plot = TRUE, axis.lty = 0, offset = 0,
        add = FALSE, args.legend = NULL, ...)

mymei 发表于 2014-7-28 17:11
我导入你的数据，用以下命令已经出来图了。
barplot(t(counts),col=c("red","yellow","green"))

我的barplot命令没有t

barplot(counts,beside=FALSE,
        main="Stacked Bar Plot",
        xlab="week",ylab="result",
        col=c("red","yellow","green"),
        legend=rownames(counts))

t()把矩阵转置，因为barplot是对每一列数据画一个bar

mymei 发表于 2014-7-28 17:11
我导入你的数据，用以下命令已经出来图了。
barplot(t(counts),col=c("red","yellow","green"))

另外，横坐标轴没有了？用我柱状图的横坐标和这个图错位了

axis(1,at=seq(from=0,to=313.2,by=4.35),labels=FALSE,tck=-0.02,lwd=1.5)

把横坐标轴命令放在这个堆砌柱状图上，结果错位了，不知道为啥？在另一张图上就很好

x <- barplot(t(counts),col=c("red","yellow","green"))
x给出了每个bar实际的横坐标。