R-Project Barplot顏色

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

使用beside = TRUE參數：

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

Answer 2

傳入向量而不是表應該可以解決問題：

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)