nls函数做非线性回归

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

跪求：nls函数初值用nls2寻找老是出问题啊，谁做过非线性回归呢

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：非线性回归 线性回归 非线性 nls

是R还是matlab中的函数？

hongyashan123 发表于 2017-9-4 14:27
是R还是matlab中的函数？

用r语言，您会吗？

可以试一试

你得把问题说清楚

hongyashan123 发表于 2017-9-4 15:45
可以试一试

您好，可以加个好友吗？我现在遇到的问题是这样的。我要用nls函数进行非线性拟合，我之前用数据里的一部分进行非线性拟合，初值试了出来，但是最后做别的的时候，发现数据量少了。我就把全部数据用上，又做了非线性拟合，但是初值试不出来，我又看了Nonlinear Regression with R，用nls2也没弄出来，又找了Modern Applied Statistics with S用那个方法也没弄出来，我的qq850817042，跪求大神帮忙

你把数据的和模型发过来

hongyashan123 发表于 2017-9-4 16:39
你把数据的和模型发过来

怎么给您发呢

yiyumo123 发表于 2017-9-4 18:01
怎么给您发呢

我的数据好几万呢

data <- read.csv("shuju1.csv",header = T)
data <- data[-which(data$B2grWindSpeed=="****"),] ## 剔除缺失值
Speed <- as.numeric(as.character(data$B2grWindSpeed)) ##　风速转换为数值型
Process <- as.numeric(as.character(data$B2grGenPowerForProcess)) ## 功率转换为数值型
Direction <- as.numeric(as.character(data$B2grWindDirection)) ## 风向转换为数值型
Speed = Speed[-which(is.na (Process))]
Direction = Direction[-which(is.na (Process))]
Process = Process[-which(is.na (Process))]
p_max = max(p)
start = list(a = 1, b=4)
Mode2 <- nls(p~p_max*(1-exp(-(v/b)^a)), start = start)
M2 <- summary(Mode2)
M2$coefficients ## 显示拟合参数