【发布时间】:2016-11-07 18:22:51
【问题描述】:
A B C D
Xy 10 20 30 40
Yz -4 6 10 15
我想创建一个分组条形图,在 x 轴上显示 A,B,C,D 和 Xy,Yz 作为 A,@987654329 的两个堆叠图表@,C,D。
提前致谢。
我尝试使用barplot,但无法绘图。
【问题讨论】:
A B C D
Xy 10 20 30 40
Yz -4 6 10 15
我想创建一个分组条形图,在 x 轴上显示 A,B,C,D 和 Xy,Yz 作为 A,@987654329 的两个堆叠图表@,C,D。
提前致谢。
我尝试使用barplot,但无法绘图。
【问题讨论】:
看起来你有一个矩阵X:
X <- rbind(1:4 * 10, c(-4, 6, 10, 15))
colnames(X) <- LETTERS[1:4]
rownames(X) <- c("Xy", "Yz")
# A B C D
# Xy 10 20 30 40
# Yz -4 6 10 15
作为开始,你可以这样做:
barplot(X, names.arg = colnames(X), legend.text = rownames(X),
args.legend = list(x="topleft", bty="n"), col = c(3,4))
我个人认为 stack barplot 很难理解。我会选择并排显示X 的每一行:
barplot(X, names.arg = colnames(X), legend.text = rownames(X),
args.legend = list(x="topleft", bty="n"), col = c(3,4),
beside = TRUE)
【讨论】: