R 如何从nls中获得结果

我的资料如下：

df<-read.table (text=" cup size
12  30.76923077
13  38.46153846
14  53.84615385
15  76.92307692
16  92.30769231
17  100", header=TRUE)

---

我使用了fit[[2]]，但它对我不起作用。

正如@user20650所建议的，

coef

是用于从模型中提取值的函数

如果参考，您将看到它隐藏在函数

getAllPars（）中的
m
元素中

这应该起作用：

df<-read.table (text=" cup size
12  30.76923077
13  38.46153846
14  53.84615385
15  76.92307692
16  92.30769231
17  100", header=TRUE)

y=as.vector(df$cup)
x=as.vector(df$size)
fit <- nls(1/y ~ 1 + exp(-b*(x-c)), start = list(b = 0.01, c = 12), alg = "plinear")
myvector <- coef(fit)
b <- myvector[1]
c <- myvector[2]
lin <- myvector[3]

dft感谢您的帮助
b= 0.01552
c= 5.98258
lin= 0.04887

fit$m$getAllPars()
         b          c       .lin 
0.01552340 5.98262729 0.04887368 

df<-read.table (text=" cup size
12  30.76923077
13  38.46153846
14  53.84615385
15  76.92307692
16  92.30769231
17  100", header=TRUE)

y=as.vector(df$cup)
x=as.vector(df$size)
fit <- nls(1/y ~ 1 + exp(-b*(x-c)), start = list(b = 0.01, c = 12), alg = "plinear")
myvector <- coef(fit)
b <- myvector[1]
c <- myvector[2]
lin <- myvector[3]