全部版块 我的主页
论坛 数据科学与人工智能 数据分析与数据科学 R语言论坛
4418 11
2013-06-03
图片1.jpg 如上图,我是用下面程序画出来的

h=function(b){
w=(1+b^2)/(1+(b-1)^2)
2*log(w)
}
x=seq(from=-5,to=5,by=0.01)
y=h(x)
plot(x,y,type='l')

我想要在上图中的点(-0.25,-1.76)向左画一条水平虚线, 在点(1.25,1.76) 处向右画一条水平虚线,在点(-0.25,0)向上垂直画一条虚线,在点(1.25,0)向上垂直画一条虚线,怎么画呢  多谢各位了啊!



二维码

扫码加我 拉你入群

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

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

全部回复
2013-6-3 20:25:29
h=function(b){
w=(1+b^2)/(1+(b-1)^2)
2*log(w)
}
x=seq(from=-5,to=5,by=0.01)
y=h(x)
plot(x,y,type='l')
abline(h = -1.76,lty = 2)
abline(h = 1.76,lty = 2)
abline(v = -0.25,lty = 2)
abline(v = 1.25,lty = 2)
二维码

扫码加我 拉你入群

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

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

2013-6-3 20:28:56
二维码

扫码加我 拉你入群

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

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

2013-6-3 20:30:15
szxship 发表于 2013-6-3 20:25
h=function(b){
w=(1+b^2)/(1+(b-1)^2)
2*log(w)
谢谢了  不过我想要的是不显示x>-0.25时,y=-1.76对应的 水平线,不显示x<1.25,y=1.76对应的水平线,怎么画呢,多谢了
二维码

扫码加我 拉你入群

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

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

2013-6-3 20:47:13
用abline或者line只能画出直线,没法直接满足lz的要求,最简便的办法可以通过绘制箭头的低级绘图函数,但需要将尖短线的长度设为0,最后附上代码,lz可以一试:
复制代码
希望对lz有用
二维码

扫码加我 拉你入群

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

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

2013-6-3 22:07:03
szxship 发表于 2013-6-3 20:25
h=function(b){
w=(1+b^2)/(1+(b-1)^2)
2*log(w)
h=function(b){
w=(1+b^2)/(1+(b-1)^2)
2*log(w)
}
x=seq(from=-5,to=5,by=0.01)
y=h(x)
plot(x,y,type='l')
rect(-0.25,1.76,1.25,-1.76,lty = 2)
二维码

扫码加我 拉你入群

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

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

点击查看更多内容…
相关推荐
栏目导航
热门文章
推荐文章

说点什么

分享

扫码加好友,拉您进群
各岗位、行业、专业交流群