24小时热门版块排行榜    

查看: 1415  |  回复: 3
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

caroly77

金虫 (小有名气)

[求助] R软件如何做多项式拟合线

需要加载额外的程序包么
运行下面的代码
m1<-lm(resp~dose,data=datanew)
lines(fitted(m1)~dose,data=datanew,col="red"
一直出现这样的错误 “误于plot.xy(xy.coords(x, y), type = type, ...) : 还没有调用plot.new ”
数据格式是这样的
dose   resp
1         0.2
1         0.3
2         0.5
2         0.53
3         0.7
3         0.9
请教下是出什么问题了
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

mmjjwanm

金虫 (正式写手)

【答案】应助回帖


xzhdty(金币+1): 欢迎常来程序语言看看 2011-10-02 21:17:26
caroly77(金币+10): 谢谢 应该是你说的第二点的那里 我没有注意 出错了 2011-10-06 18:38:46
1)楼主程序中拟合的是直线回归,不是多项式回归,若用多项式回归用两种方式:a) lm(y~x+x^2)类似;b)lm(y ~ poly(x, 2))类似(阶数自己调整)。

2)lines属于低层次绘图,只能添加在已经绘制的图上面,应该先用plot绘制出散点图,在用lines添加曲线。

例如:

dose<-c(1,1,2,2,3,3)
resp<-c(0.2,0.3,0.5,0.53,0.7,0.9)

m1<-lm(resp~dose)
plot(dose,resp)
vec<-seq(1, 3, by=0.2)
lines(vec,-0.02833+0.275*vec,col="red" #拟合的模型

希望可以帮到你,常见的R问题可以直接上google,注意一定要用英文搜索哦
4楼2011-09-30 23:53:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 4 个回答

harryzs

铜虫 (正式写手)

【答案】应助回帖

.....
m1<-lm(resp~dose,data=datanew)
plot(datanew$resp,datanew$dose)
lines(fitted(m1)~dose,data=data,col="red"
.........
2楼2011-09-30 00:19:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jjdg

版主 (知名作家)

优秀版主

【答案】应助回帖

xzhdty: 谢谢jjdg斑斑 2011-10-02 21:17:47
试试
其他软件呢!
努力学习!以正当途径!获得需要的知识!
3楼2011-09-30 12:40:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 投票:  有多少人是今天查系统知道结果的? +16 爱看书的可乐 2026-08-26 18/900 2026-08-28 17:09 by winsaint
[基金申请] 有没有仍没收到信息的 +3 德尚中行 2026-08-27 3/150 2026-08-28 15:24 by rongshuxia
[基金申请] 基金不中,共勉 +11 eulota 2026-08-26 11/550 2026-08-28 14:22 by 火星超人xi
[基金申请] 麻烦专家们看看评委们的意见(F口面上) +4 gdd2018 2026-08-28 9/450 2026-08-28 14:22 by jklily
[基金申请] 国自然面上复盘~欢迎讨论 (金币+15) +12 晴天加油 2026-08-26 13/650 2026-08-28 11:32 by skyjudy
[基金申请] 怎么查啊 +6 huang1991js 2026-08-26 6/300 2026-08-28 08:42 by winsaint
[基金申请] 面上合作单位盖章 +5 ssyjh 2026-08-27 5/250 2026-08-27 20:50 by gdfollow
[基金申请] 看板上这么多中的,有点像50人群里49个人都是骗子的那种感觉…… +5 a089 2026-08-26 6/300 2026-08-27 14:05 by jonewore
[基金申请] 为什么 国际(地区)合作与交流项目 没有放榜? 10+3 majunge000 2026-08-26 11/550 2026-08-27 08:42 by 北京莱茵编辑
[基金申请] 我不理解! +15 Edward_pc 2026-08-26 23/1150 2026-08-26 20:34 by zzuzxg
[基金申请] 2026年的国家社科基金项目通讯评审的新规则与新动向、新挑战 +7 process2012 2026-08-23 10/500 2026-08-26 19:23 by hmhminy
[基金申请] 能否退出参与的面上项目解除限项 +23 koalala 2026-08-24 26/1300 2026-08-26 14:29 by 宝贝虫子
[基金申请] 国合里面能看到了 +7 一怀馨秋 2026-08-26 7/350 2026-08-26 11:23 by zhaosm1982
[基金申请] 国际合作可查了,中了面上 (EPI+1)(金币+50) +18 Ldrop2023 2026-08-26 18/900 2026-08-26 11:15 by cmrandy
[基金申请] 系统进不去 +4 yanglien 2026-08-26 5/250 2026-08-26 11:10 by wenfengw83
[基金申请] 项目信息和经费信息在系统里都可以看到了 +6 wittyboy 2026-08-26 14/700 2026-08-26 10:55 by wittyboy
[基金申请] 国合可查了 +3 paperzjh 2026-08-26 3/150 2026-08-26 10:41 by LemmonTr
[基金申请] 今天务委会开完了,明天出结果吗 +19 angus9576 2026-08-25 23/1150 2026-08-26 10:03 by zp519
[基金申请] 在坚冰还盖着北海的时候,我看到了怒放的梅花。 (金币+10) +6 ziyangfang 2026-08-25 9/450 2026-08-25 20:26 by huagongfeihu
[基金申请] 没有任何消息-是不是就凉了 +9 图啦图啦 2026-08-24 10/500 2026-08-25 11:59 by 南海小哥
信息提示
请填处理意见