1

我正在尝试生成一个带有分类 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 轴标签以及添加图例来区分哪个是箱线图和哪个是线图。对此的任何帮助将不胜感激

谢谢你。

4

1 回答 1

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)

而且您显然需要进行一些编辑才能获得您想要的颜色等。

于 2013-05-02T11:20:17.557 回答