R中的非线性曲线拟合

yaynikki程序

我正在研究R中的非线性曲线拟合,但无法弄清楚如何使用变量来约束数据。这是一个示例:

dat<-read.table(text="time y
1 4.62
2 13.55
3 30.82
6 93.97
12 145.93
24 179.93", header = TRUE)
plot(data);lines(data)
model <- nls(y ~ Max * (1-exp(-k * (time - Lag))),data=dat,start=list(Max = 200, k = 0.1, Lag = 0.5))

我想包括如果(时间-滞后)<0,则y = 0,但我一生无法解决。

G.格洛腾迪克

乘以右侧 (time > Lag)

st <- list(Max = 200, k = 0.1, Lag = 0.5)
model <- nls(y ~ (time > Lag) * Max * (1-exp(-k * (time - Lag))), data = dat, start = st)
model
## Nonlinear regression model
##   model: y ~ (time > Lag) * Max * (1 - exp(-k * (time - Lag)))
##    data: dat
##      Max        k      Lag 
## 185.6447   0.1523   1.6016 
##  residual sum-of-squares: 65.06
##
## Number of iterations to convergence: 4 
## Achieved convergence tolerance: 2.016e-07

plot(dat)
lines(fitted(model) ~ time, dat, col = "red")

屏幕截图

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

SciPy中的指数曲线拟合

来自分类Dev

对R中的经验数据进行曲线拟合

来自分类Dev

在GSL中,是任何用于非线性曲线拟合的函数

来自分类Dev

如何判断SciPy中的指数曲线拟合程度如何?

来自分类Dev

简单的曲线拟合

来自分类Dev

R中的非线性最小二乘曲线拟合

来自分类Dev

在R中拟合广义非线性模型

来自分类Dev

在R中拟合非线性Langmuir等温线

来自分类Dev

R nls:将曲线拟合到数据

来自分类Dev

曲线拟合到指数

来自分类Dev

JS指数曲线拟合

来自分类Dev

如何定义曲线拟合中的函数?

来自分类Dev

错误非线性回归python曲线拟合

来自分类Dev

非线性拟合正弦曲线失败

来自分类Dev

Matlab中的n维非线性曲线拟合

来自分类Dev

对R中的经验数据进行曲线拟合

来自分类Dev

用MATLAB进行分段线性曲线拟合

来自分类Dev

指数曲线拟合Matlab

来自分类Dev

R nls:将曲线拟合到数据

来自分类Dev

曲线拟合-数据集

来自分类Dev

剂量响应 - 使用 R 的全局曲线拟合

来自分类Dev

预测曲线拟合matlab

来自分类Dev

如何在 R 中拟合非线性线?

来自分类Dev

R:拟合曲线到点:使用什么线性/非线性模型?

来自分类Dev

曲线拟合分布

来自分类Dev

如何将正态曲线拟合到此 R 代码中?

来自分类Dev

Octave 中的非线性拟合

来自分类Dev

如何从非线性回归拟合功率曲线?

来自分类Dev

为什么在 scipy 中优化曲线拟合为这个非线性模型创建一条直线?