Skip to contents

Calcula a matriz de informacao de Fisher observada (Hessiana negativa da log-verossimilhanca) em um ponto, e os erros-padrao assintoticos.

Usage

rnp_informacao_fisher(log_veross, theta, digits = 4L)

Arguments

log_veross

Funcao function(theta) ... (log-verossimilhanca).

theta

Ponto de avaliacao (tipicamente a EMV).

digits

Inteiro.

Value

Uma lista com informacao (matriz) e erros_padrao (vetor).

Examples

set.seed(1); x <- rnorm(100, 2, 1)
ll <- function(th) sum(dnorm(x, th[1], th[2], log = TRUE))
rnp_informacao_fisher(ll, c(2, 1))$erros_padrao
#> [1] 0.1017 0.0850