MLE с векторами в качестве аргументов

Я пытаюсь использовать функцию mle() в R, но кажется, что аргумент начального списка может быть только списком отдельных элементов, а не векторов.

Есть ли способ передать список векторов?

Ниже то, что у меня есть сейчас:

inits <- list(position=c(-0.5,0.5,0.2,
               -0.2,0.3,-0.3,0.4,0), 
 weight=c(5,1), 
 beta=c(-1,-1), 
 prob_s=c(0.5,0.5))

fit <- mle(LL, start = inits)

Моя функция LL выглядит так:

LL <- function(position, weight, 
               beta, prob_s)

r mle
person Latcie    schedule 07.12.2018    source источник
comment
Какой у вас LL?   -  person Erin    schedule 07.12.2018
comment
Обновлен исходный пост, чтобы включить подпись функции.   -  person Latcie    schedule 07.12.2018

Ответы (1)


arrow_upward
0
arrow_downward

Если вы говорите о функции mle() из пакета stats4, то, насколько я знаю, у вас не может быть векторных параметров. Вы можете заключить вашу LL() функцию в другую функцию, которая передается в mle(). Например,

LL1 <- function(position1, position2, position3, position4, 
                position5, position6, position7, position8,
                weight1, weight2, 
                beta1, beta2,
                prob_s1, prob_s2)
         LL(position = c(position1, position2, position3, position4, 
                position5, position6, position7, position8),
            weight = c(weight1, weight2),
            beta = c(beta1, beta2),
            prob_s = c(prob_s1, prob_s2))

fit <- mle(LL1, start = unlist(inits))
person user2554330    schedule 07.12.2018