Teste de escore (Rao) para um parametro escalar

Testa H0: theta = theta0 usando a estatistica de escore U(theta0)^2 / I(theta0) ~ qui-quadrado(1), com derivadas numericas.

Usage

rnp_teste_score(log_veross, theta0, digits = 4L)

Arguments

log_veross

Funcao escalar function(theta) ....

theta0

Valor sob a hipotese nula.

digits

Inteiro.

Value

tibble com estatistica, gl, p_valor, theta0.

See also

Other inferencia: rnp_bayes_conjugada(), rnp_bootstrap(), rnp_bootstrap_parametrico(), rnp_emv(), rnp_ic_bootstrap(), rnp_ic_verossimilhanca(), rnp_informacao_fisher(), rnp_jackknife(), rnp_log_verossimilhanca(), rnp_metodo_momentos(), rnp_poder_teste(), rnp_tamanho_amostra_teste(), rnp_teste_aderencia(), rnp_teste_binomial(), rnp_teste_grubbs(), rnp_teste_ks(), rnp_teste_normalidade(), rnp_teste_permutacao(), rnp_teste_proporcoes(), rnp_teste_qui_quadrado(), rnp_teste_razao_veross(), rnp_teste_runs(), rnp_teste_sinais(), rnp_teste_wald()

Examples

set.seed(1); x <- rpois(100, 3)
ll <- function(l) sum(dpois(x, l, log = TRUE))
rnp_teste_score(ll, theta0 = 2.5)
#> # A tibble: 1 × 4
#>   estatistica    gl p_valor theta0
#>         <dbl> <int>   <dbl>  <dbl>
#> 1        9.92     1  0.0016    2.5