请选择 进入手机版 | 继续访问电脑版
11218 9

[问答] R语言中的画图问题,如何在两条线之间添加阴影部分 [推广有奖]

  • 0关注
  • 0粉丝

初中生

90%

还不是VIP/贵宾

-

威望
0
论坛币
0 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
79 点
帖子
5
精华
0
在线时间
32 小时
注册时间
2018-12-5
最后登录
2019-11-13

相似文件 换一批

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
微信图片_20181231131755.png

如何在图片的两条红色的线之间添加阴影
代码如下:
plot(mvalue,effect,type="l",col="#00b0f6",pch=c(15),lwd=2)
lines(mvalue,effect_cl,lty=3,col="#f8766d")
lines(mvalue,effect_cu,lty=3,col="#f8766d")

二维码

扫码加我 拉你入群

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

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

关键词:两条线

zhou1_20 发表于 2018-12-31 22:11:05 |显示全部楼层 |坛友微信交流群
  1. x=c(1,2,3,4,5)
  2. y=c(2,3,5,6,7)
  3. lm1=lm(y~x)
  4. summary(lm1)
  5. plot(x,y,type = 'p',pch=16)
  6. polygon(c(x,rev(x)),c(0.7-0.3317 +1.2*x,rev(0.7+0.3317 +1.4*x)),col = 'yellow')
  7. lines(x,0.7+1.3*x,lwd=2,col='red')
  8. lines(x,0.7+0.3317 +1.4*x,lwd=3,col='red',lty=3)
  9. lines(x,0.7-0.3317 +1.2*x,lwd=3,col='red',lty=3)
  10. points(x,y,pch=16)
复制代码
Rplot.png




已有 2 人评分经验 论坛币 学术水平 热心指数 收起 理由
冰枫冷羽 + 100 + 1 + 1 热心帮助其他会员
cheetahfly + 10 热心帮助其他会员

总评分: 经验 + 100  论坛币 + 10  学术水平 + 1  热心指数 + 1   查看全部评分

使用道具

可是我的代码中两个line加上去的线是曲线,我并不知道它们的方程

使用道具

jimozhegu 发表于 2019-1-2 16:45:34 |显示全部楼层 |坛友微信交流群
> m <- lm(dist ~ speed, data=cars)
> p <- predict(m, interval="confidence")
> x <- c(cars$speed,
+        tail(cars$speed, 1),
+        rev(cars$speed),
+        cars$speed[1])
> y <- c(p[, "lwr"],
+        tail(p[, "upr"], 1),
+        rev(p[, "upr"]),
+        p[, "lwr"][1])
> plot(cars)
> abline(m)
> polygon(x, y, col=rgb(.7, .7, .7, .5))

类似代码,请参考
主要就是先求出x,y的几个点,然后连起来做多边形
已有 1 人评分经验 热心指数 收起 理由
冰枫冷羽 + 100 + 1 热心帮助其他会员

总评分: 经验 + 100  热心指数 + 1   查看全部评分

使用道具

终于解决啦,谢谢大家!

使用道具

玛希帕 发表于 2019-1-16 21:09:20 |显示全部楼层 |坛友微信交流群
茉上花开9801 发表于 2019-1-3 18:20
终于解决啦,谢谢大家!
您好,我也遇到了相同的问题,请问您最终是怎么解决的呢~

使用道具

zhangok 发表于 2019-1-17 11:57:51 |显示全部楼层 |坛友微信交流群
jimozhegu 发表于 2019-1-2 16:45
> m  p  x  y  plot(cars)
> abline(m)
> polygon(x, y, col=rgb(.7, .7, .7, .5))
相当不错的代码!

使用道具

茉上花开9801 发表于 2019-1-3 18:20
终于解决啦,谢谢大家!
能分享下您的代码吗?谢谢

使用道具

13296582591 发表于 2020-9-17 18:32:28 |显示全部楼层 |坛友微信交流群
茉上花开9801 发表于 2019-1-3 18:20
终于解决啦,谢谢大家!
你好请问您如何解决这个问题的,能否给予指导

使用道具

13296582591 发表于 2020-9-17 18:33:23 |显示全部楼层 |坛友微信交流群
玛希帕 发表于 2019-1-16 21:09
您好,我也遇到了相同的问题,请问您最终是怎么解决的呢~
您好 请问您解决了吗 请求帮助

使用道具

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-3-29 19:01