2015-10-29 310 views
0

我有4個線性方程。我使用了par(plot = new)的曲線,但它會覆蓋線條而不是繪製平行線條。如何在R中的同一圖上繪製多條線?

y<-2*x+1 
y<-2*x+3 
y<-(-2)*x+1 
y<-(-2)*x+3 

我該如何繪製這些四條線在單個情節上看平行四邊形的情節。

+0

你是否已經檢查類似的東西[這](HTTP:/ /stackoverflow.com/questions/14860078/plot-multiple-lines-data-series-each-with-unique-color-in-r)和[這些]的所有(http:// stacko verflow.com/search?q=%5Br%5D+plot+multiple+lines)? –

+0

'curve'中有'add'參數。 –

回答

1

這可能是你在找什麼? 我只是在這裏隨機生成X值。

set.seed(42);x<-rnorm(100) 

plot(x,2*x+1,type="l",xlab="X",ylab="Y") 
lines(x,2*x+3) 
lines(x,(-2)*x+1) 
lines(x,(-2)*x+3) 

enter image description here

+0

它可以工作,但是當我使用我的數據時,只有一行出現。 A1 <-61569627.5 B1 <-1601 A2 <-61569713.25 B2 <-2139.5 A3 <-61569843.25 B3 <-2032.5 A4 <-61569872.75 B4 <-1820.5 平方米< - (B3-B1)/( a3-a1) m4 <-m2 m1 < - (b4-b2)/(a4-a2) m3 <-m1 set.seed(42); x <-1:10; (x,m2 *(x-a2)+ b2) lines(x,m1 *(x-a1)+ b1,type =「l」 (x,m3 *(x-a3)+ b3) lines(x,m4 *(x-a4)+ b4) – logicstar

+0

爲了包含其他行,您需要設置'ylim'來包含所有範圍您的模型生成的值。例如下面的答案所示。請注意,在您的評論中提供的數據中,某些行似乎是平行的,並且不會交叉。 – BlankUsername

1

或者你可以添加XLIM和ylim

limy=c(-4,4) 
limx=c(-4,4) 
curve(y<-2*x+1,xlim=limx,ylim=limy,ylab="") 
par(new=T) 
curve(y<-2*x+3,xlim=limx,ylim=limy,ylab="") 
par(new=T) 
curve(y<-(-2)*x+1,xlim=limx,ylim=limy,ylab="") 
par(new=T) 
curve(y<-(-2)*x+3,xlim=limx,ylim=limy,ylab="") 
1

隨着ggplot你可以做

x <- rnorm(100*1,mean=0,sd=1) 
ggplot() + geom_line(aes(x,2*x+1)) + geom_line(aes(x,2*x+3)) etc 
相關問題