24小时热门版块排行榜    

查看: 1433  |  回复: 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的回帖

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的回帖

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的回帖
相关版块跳转 我要订阅楼主 caroly77 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 s3fFTmArrBt6 2026-09-14 3/150 2026-09-14 23:45 by vZfe6xYu34yj
[硕博家园] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 s3fFTmArrBt6 2026-09-13 5/250 2026-09-14 23:13 by vZfe6xYu34yj
[硕博家园] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 s3fFTmArrBt6 2026-09-13 5/250 2026-09-14 22:45 by vZfe6xYu34yj
[考研] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +5 LwdutQ8HoqWP 2026-09-13 5/250 2026-09-14 22:25 by vZfe6xYu34yj
[博后之家] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 3n8v2C8RimXI 2026-09-13 5/250 2026-09-14 22:12 by vZfe6xYu34yj
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +5 3n8v2C8RimXI 2026-09-13 5/250 2026-09-14 22:01 by vZfe6xYu34yj
[博后之家] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +4 QUjhNVAcOSff 2026-09-13 4/200 2026-09-14 21:37 by vZfe6xYu34yj
[考研] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +4 QUjhNVAcOSff 2026-09-13 5/250 2026-09-14 21:33 by vZfe6xYu34yj
[公派出国] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 QUjhNVAcOSff 2026-09-13 7/350 2026-09-14 21:21 by vZfe6xYu34yj
[考博] 上海工程技术大学激光智能制造课题组招收博士研究生 +4 两三岁ss 2026-09-14 4/200 2026-09-14 20:29 by 班主任的同桌
[考研] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 s3fFTmArrBt6 2026-09-14 3/150 2026-09-14 18:01 by Aj1rhIDL5ixY
[考博] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 s3fFTmArrBt6 2026-09-14 4/200 2026-09-14 17:49 by Aj1rhIDL5ixY
[找工作] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 s3fFTmArrBt6 2026-09-14 4/200 2026-09-14 17:48 by Aj1rhIDL5ixY
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +4 3n8v2C8RimXI 2026-09-13 4/200 2026-09-14 15:37 by Aj1rhIDL5ixY
[找工作] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +5 QUjhNVAcOSff 2026-09-13 6/300 2026-09-14 15:21 by Aj1rhIDL5ixY
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 QUjhNVAcOSff 2026-09-13 3/150 2026-09-14 15:09 by Aj1rhIDL5ixY
[考研] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 QUjhNVAcOSff 2026-09-13 3/150 2026-09-14 14:57 by Aj1rhIDL5ixY
[找工作] 浙江师范大学是怎么坑我的 +6 recruit123 2026-09-09 6/300 2026-09-14 12:00 by 萨仁其其格
[考博] 西北工业大学材料学院电化学传感与催化课题组招收2027年推免研究生、博士生、博士后 +3 马方园 2026-09-10 4/200 2026-09-14 09:29 by Chem张zz
[考博] 27秋季材料博士申请求助 10+3 Cahal1 2026-09-11 4/200 2026-09-14 08:50 by 北京莱茵编辑
信息提示
请填处理意见