如何获得R中Sigmoid生长模型的预测值

Question

我正在尝试使用R中的Sigmoid增长模型来预测未来的收入。模型是这样的：

Sigmoid生长（“sigmoid”意为“S形”），Y = a /（1 + ce ^（ - bX））+噪声

我的代码：

x <- seq(-5,5,length=n)
y <- 1/(1+exp(-x))
plot(y~x, type='l', lwd=3)
title(main='Sigmoid Growth')

即使我可以绘制情节，但我不知道如何获得未来的价值观。假设我想预测未来6年的收入值。

Answer 1

使y成为一个函数，并绘制（plot对函数有特殊支持）：

y <- function(x) 1/(1+exp(-x))
plot(y,-5,11,type="l",lwd=3)