在用R绘制的分段线性拟合图中，横坐标上的一组黑色线段怎样删除？

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

代码如下：
data("down")
fit.glm=glm(cases/births~age,weight=births,family=binomial,data=down)
fit.seg=segmented(fit.glm,seg.Z=~age,psi=25)
dev.new()
plot(down$age,log(down$cases/down$births),pch=20,cex=1.5,ylab="logit(cases/births)",xlab="Mother Age")
par(new=TRUE)
plot(fit.seg,col="red",lwd=2,ylab="",xlab="",ylim=c(min(log(down$cases/down$births)),max(log(down$cases/down$births))))

第一张图是自己画的，第二张图是示例。两张图的横坐标对比后发现，我绘制的图中横坐标上多出一组黑色的线段，每个黑色线段对应一个点，如果用：plot(fit.seg,add=TRUE,col="red",lwd=2,ylab="",xlab="") 就不会出现这些黑色线段了。所以想问一下在只绘制拟合结果（红色线）的时候怎样删掉它们？

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：横坐标 segmented segment minor Steel R语言 segmented plot绘图