兩個刻度在同一軸上

Question

我不確定是否有可能做我想做的事。 我想用兩個比例繪制一個x軸，如下圖所示。 非常感謝，

Answer 1

ggplot2版本看起來像這樣：

library(ggplot2)

x = c(1,2,3,4,5, 10,20,30,40,50)
y = c(1,2,2,3,4, 2,1,3,5,5)
# You should introduce cond - condition to separate axises - by yourself
df = data.frame(x=x,y=y,cond=ifelse(x>5,"x2","x1"))

ggplot(df, aes(x,y,group=cond)) + geom_line() + geom_point(aes(shape=cond), size=4) + facet_grid(.~cond, scales="free_x")

這產生了這個情節：

Answer 2

這是一個使用基礎R圖形的版本。 您可以更多地使用它來獲得您想要的東西，但這基本上就是您所追求的。

plot.new()
par(mfcol=c(1,2))
plot(1:5,ann=FALSE,bty="n",type="l",ylim=c(0,25))
grid(ny=NA)
par(mar=c(5.1, 0, 4.1, 2.1))
plot(c(10,20,30,40,50),c(8,5,15,20,20),yaxt="n",ann=FALSE,bty="n",type="l",ylim=c(0,25))
grid(ny=NA)
par(new=TRUE)
par(mfcol=c(1,1))
par(bty="l")
par(mar=c(5.1, 4.1, 4.1, 2.1))
plot(NA,ylim=c(0,25),type="n",xaxt="n",yaxt="n",ann=FALSE)
box()
grid(nx=NA,ny=NULL)

編輯 - 把它搞砸了一下

Answer 3

我並不完全確定，但作為一個起點，看一看?facet_grid()在ggplot2 。

並排獲得兩個地塊不應該太難。 然后你可能想要關閉軸然后添加適當的比例

問谷歌關於axis.line = theme_blank()

祝好運！