Я подгоняю экспоненциальное распределение, используя функцию Fitdistcens из пакета distrplus. мой набор данных содержит полные данные и данные о приостановке. однако «exp» выдает мне сообщение об ошибке ниже:
<simpleError in optim(par = vstart, fn = fnobjcens, fix.arg = fix.arg,
gr = gradient,
rcens = rcens, lcens = lcens, icens = icens, ncens = ncens,
ddistnam = ddistname, pdistnam = pdistname, hessian = TRUE,
method = meth, lower = lower, upper = upper, ...): non-finite finite-
difference value [1]>
Error in fitdistcens(dataset1, "exp") :
the function mle failed to estimate the parameters,
with the error code 100
вот мой код:
dataset1<-dataset[1:2]
library(fitdistrplus)
fitexp <- fitdistcens(dataset1,"exp")
Может кто-нибудь помочь мне разрешить этот код ошибки? я могу поделиться своим набором данных.