我有以下数据：
x <- c(10,20,30,40,50,60,70)
y <- c(110,235,435,655,830,930,980)
population <- data.frame(y,x)
当我尝试计算逻辑增长模型的参数时：
fit_data <- nls(y ~ SSlogis(x, phi1, phi2, phi3), data = population)
alpha <- coef(fit_data) #extracting coefficients
我获得以下系数：
phi1
1015.103
phi2
33.29877
phi3
11.11867
与使用TI-84计算器获得的结果有很大不同：1015.1, 19.98, -0.09。任何人都可以解释这种差异吗？我对R做错了吗？