具有分類X軸的Barplot

Question

我正在嘗試生成具有分類X軸和兩個不同Y軸的條形圖。我試圖用twoord.plot生成柱狀圖如下：

x <- c("A","B","C","D","E") 
ry <- c(0.1,0.2,0.3,0.4,0.5) 
ly <- c(0.15,0.25,0.35,0.45,0.55) 
library(plotrix) 
twoord.plot(x,ry,x,ly, 
      xlab="xLabel", 
      ylab="yLabel", 
      rylab="ryLabel", 
      main="Main", 
      type=c("bar","l"),lcol=rainbow(length(x)),rcol=4) 

不過，我得到一個錯誤「在plot.window錯誤（...）：無效‘XLIM’價值」。

有沒有辦法使用分類/字符變量作爲x軸？另外，有沒有辦法旋轉X軸標籤，使其顯示在45度？

我已經能夠得到這個代碼有以下變化工作：

xNumeric <- seq(1:length(x)) 
twoord.plot(xNumeric,ly,xNumeric,ry, 
       xlab="xLabel", 
       ylab="yLabel", 
       rylab="ryLabel", 
       main="Main", 
       type=c("bar","o"),lcol=rainbow(length(x)),rcol = 4,xticklab = x) 

但是，我仍然需要弄清楚如何使X軸標籤，以及添加一個傳奇分化在箱形圖和哪個線圖之間。任何幫助，將不勝感激

謝謝。

Answer 1

這不是plotrix，但是......

ry <- c(0.1,0.2,0.3,0.4,0.5) 
ly <- c(15,35,65,75,80) 
x <- 1:5 
xlabs <- c("A","B","C","D","E") 
barplot(ly, xaxt="n", yaxt="n", xlab="xLabel", ylab="lyLabel", ylim=c(0,100)) 
axis(2, seq(0,100,by=5), seq(0,100,by=5), las=2) # you can adjust positions of ly labels 
par(new=TRUE) 
plot(ry~x, xaxt="n", yaxt="n", xlab="", ylab="", ylim=c(0,1)) 
axis(1, 1:5, xlabs) 
axis(4, 1:10/10, 1:10/10, las=2) # you can adjust positions of ry labels 
mtext("ryLabel", 4, line=2) 

而且你顯然需要編輯一個有點讓你似乎是想爲顏色等。