R-Project 条形图颜色

Question

我是 R 的新手，我正在尝试创建一个简单的条形图。我已经能够创建一个具有正确值的条形图，但所有条形图只有一种颜色。如果我稍微更改代码（使用 table() 而不是 as.table() ），我会得到错误的值，但图表上的颜色是正确的。如何让 as.table() 接受图形中的多种颜色？这是我的代码的修改版本：

a=30
b=20
c=10
d=15
x=matrix(c(a,b,c,d),ncol=4,byrow=TRUE)   
colnames(x)=c("Label1","Label2","Label3","Label4")  
    rownames(x)=c("Percentage")  
    x=as.table(x)  
    color=c("red","blue","green","orange")
barplot(x,main="X",ylab="Percent",cex.names=0.75,col=color)

Answer 1

传递向量而不是 table 应该可以解决问题：

barplot(x[1, ], main="X", ylab="Percent", cex.names=0.75, col=color)

或者

barplot(x["Percentage", ], main="X",ylab="Percent",cex.names=0.75, col=color)

Answer 2

使用beside = TRUE参数：

barplot(x, beside = TRUE, main="X", ylab="Percent", cex.names=0.75, col=color)

R-Project 条形图颜色

R-Project Barplot Colors

r

colors

bar-chart