Я знаю, что в Интернете полно вопросов (и ответов) об ошибке 'initial value in vmmim is not finite' при попытке подогнать параметры для объекта mle2 . У меня нет этой ошибки при создании моего объекта mle2 , но я получаю эту ошибку при попытке...

Недавно я построил статистическую модель с минимизацией отрицательной логарифмической вероятности. Необходимо оценить девять параметров (на самом деле я хочу добавить еще два). Было использовано несколько методов оптимизации в R, включая...

nll <- function(lambda, kappa){ logit=function(x) {log(x/(1-x))} a=c(1-exp(-(15/lambda)^kappa), 1-exp(-(25/lambda)^kappa), 1-exp(-(35/lambda)^kappa)) a=logit(a) mu = c(0.1, 0.2, 0.3) mu = logit(mu) cov = matrix(c(0.18830690,...

я получил ошибку File "C:/Users/", line 70, in <module> cal_PIN() File "C:/Users/", line 67, in cal_PIN cal_likelihood(selling_5_tick, buying_5_tick) File "C:/Users/", line 48, in cal_likelihood raise...

Мы смоделировали набор данных и создали модель. set.seed(459) # seed mass n <- 1000 seed.mass <- round(rnorm(n, mean = 250, sd = 75),digits = 1) ## Setting up the deterministic function detFunc <- function(a,b,x){ return(exp(a+b*x)) /...