Buenas tardes, presento inconvenientes ajustar el modelo de crecimiento de
Gompertz, le doy unos valores iniciales y me arroja el siguiente error: Warning
message:
In nls(IPA ~ (b0 * MC * log(b1/MC)), data = datos, start = list(b0 = 0.06,
:
step factor 0.000488281 reduced below 'minFactor' of 0.000976562
El código es el siguiente
install.packages("readxl")
library(readxl)
datos <- read_excel("CC.xlsx")
datos
install.packages("nls2")
library(nls2)
install.packages("proto")
library(proto)
install.packages("nlstools")
library(nlstools)
library(nlsMicrobio)
control=nls.control(warnOnly = TRUE)
modelgmp <- nls(IPA ~ (b0*MC*log(b1/MC)), data=datos,
start=list(b0=0.06,b1=100), control=control, trace=T)
summary(modelgmp)
los datos son:
MC IPA
<dbl> <dbl>
1 12.5 9.50
2 17.5 13.3
3 22.5 22.5
4 27.5 25.3
5 32.5 34.6
6 37.5 41.4
7 42.5 54.3
8 47.5 62.4
9 52.5 63.8
10 57.5 56.9
Muchas gracias
[[alternative HTML version deleted]]