R 中的低音扩散模型，不适用于年度数据

Question

我想在 R 中使用低音扩散模型。

我使用了以下代码：

library(diffusion)

years <- c(2016, 2017, 2018, 2019, 2020, 2021, 2022, 2023)
adopters <- c(1000, 2500, 6000, 13000, 28000, 45000, 72000, 110000)

bass_model <- diffusion(years, adopters, type = "bass")

我期望 R 创建一个低音扩散模型。相反，我收到以下错误：

显示以下错误：

结构错误（list（type = type，call = sys.call（），w = w，y = y，：找不到对象'vOut'”

有人遇到类似问题并可以帮我解决这个问题吗？

Answer 1

diffusion(y,w,...)

函数期望

y

为每周期采用率，

w

为曲线参数。当设置为默认值

w = NULL

时，所有参数都会被优化。有关此函数及其示例的更多信息，请在控制台中运行

?diffusion

。

所以您只需要

adopters

的

y

数据。

diffusion(adopters, type = "bass")
# bass model

#Parameters:
#      Estimate p-value
#m 1326837.9106      NA
#p       0.0024      NA
#q       0.4935      NA

#sigma: 7660.9236