2017-07-25 97 views
0

比方說,我有,我已經繪製(在Y0軸繪製在左手側)下面的(X0,Y0)數據:添加附加Y軸中的R與GGPLOT2

x0,y0 
----- 
500,1 
200,3 
... 

進一步我有另一組給出的數據(X1,Y1)的:

x1 y1 
----- 
1.5,1 
3.2,2 
... 

我想在右側添加加成Y1軸,這將有X1作爲斷點和y 1爲標籤。 x1和y0具有相同的尺度,但是這兩個數據集的長度不同,並且沒有哪個公式可以用來從y0中導出x1。

謝謝

回答

1

這並不完全清楚你在找什麼。是這樣的嗎?

df1 <- data_frame(x0 = c(500, 300), 
       y0 = c(1, 3)) 

df2 <- data_frame(x1 = c(1.5, 3.2), 
        y1 = c(1, 2)) 

ggplot(df1, aes(x0, y0)) + geom_point() + 
    scale_y_continuous(expand = c(0.5,0.5), 
        sec.axis = sec_axis(trans = . ~ ., 
             breaks = df2$x1, labels = df2$y1)) 

enter image description here

+0

謝謝,工程就像一個魅力。只有一個語法錯誤:'data_frame',我認爲應該是'data.frame'。 –

+1

'data_frame'是從'tidyverse'中的'tibble'和'dplyr'導出的,其中'ggplot2'是其中的一部分。我只是忘了在頂部包含'library'聲明。 – Brian