R语言中把几张图画在同一坐标系下怎么画

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

比如，现在我有以下代码，l1，l2，l3，l4是四个函数，要plot  y1*b， y2*b， y3*b， y4*b在同一张图中，怎么画呢，多谢了。

l1=function(b){
w=(1+b^2)/(1+(b-1)^2)
2*log(w)
}
b=seq(from=-3,to=3,by=0.01)
y1=l1(b)

l2=function(b){
w=(1+b^2)/(1+(b-0.75)^2)
2*log(w)
}
y2=l2(b)

l3=function(b){
w=(1+b^2)/(1+(b-0.5)^2)
2*log(w)
}
y3=l3(b)

l4=function(b){
w=(1+b^2)/(1+(b-0.25)^2)
2*log(w)
}
y4=l4(b)

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：R语言 坐标系 function From plot 语言 坐标系

plot(b,y1,ylim=c(0,max(y1,y2,y3,y4)),col='red')
points(b,y2,col='green')
points(b,y3,col='blue')
points(b,y4,col='cyan')

IntheRed 发表于 2013-5-2 20:34
plot(b,y1,ylim=c(0,max(y1,y2,y3,y4)),col='red')
points(b,y2,col='green')
points(b,y3,col='blue')

多谢您

为何从-3到0 没有显示曲线呢

慧（会）幸福 发表于 2013-5-2 20:38
多谢您

为何从-3到0 没有曲线呢

plot(b,y1,ylim=c(min(y1,y2,y3,y4),max(y1,y2,y3,y4)),col='red',type="l",ylab="y")
lines(b,y2,col='green')
lines(b,y3,col='blue')
lines(b,y4,col='cyan')
legend("topleft", legend=c("l1","l2","l3","l4"),lty=1,col=c("red","green","blue","cyan"))

qoiqpwqr 发表于 2013-5-2 22:24
plot(b,y1,ylim=c(min(y1,y2,y3,y4),max(y1,y2,y3,y4)),col='red',type="l",ylab="y")
lines(b,y2,col=' ...

多谢了

受教了~~~~真真太有帮助了

有用、方便，学习了！

> plot(b,y1,ylim=c(min(-y1,-y2,-y3,-y4),max(y1,y2,y3,y4)),col='red',type="l")
> points(b,y2,col='green',type="l")
> points(b,y3,col='blue',type="l")
> points(b,y4,col='cyan',type="l")