我有4個線性方程。我使用了par(plot = new)的曲線,但它會覆蓋線條而不是繪製平行線條。如何在R中的同一圖上繪製多條線?
y<-2*x+1
y<-2*x+3
y<-(-2)*x+1
y<-(-2)*x+3
我該如何繪製這些四條線在單個情節上看平行四邊形的情節。
我有4個線性方程。我使用了par(plot = new)的曲線,但它會覆蓋線條而不是繪製平行線條。如何在R中的同一圖上繪製多條線?
y<-2*x+1
y<-2*x+3
y<-(-2)*x+1
y<-(-2)*x+3
我該如何繪製這些四條線在單個情節上看平行四邊形的情節。
這可能是你在找什麼? 我只是在這裏隨機生成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)
它可以工作,但是當我使用我的數據時,只有一行出現。 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
爲了包含其他行,您需要設置'ylim'來包含所有範圍您的模型生成的值。例如下面的答案所示。請注意,在您的評論中提供的數據中,某些行似乎是平行的,並且不會交叉。 – BlankUsername
或者你可以添加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="")
隨着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
你是否已經檢查類似的東西[這](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)? –
'curve'中有'add'參數。 –