Algoritmo em
Algoritmo em
Algoritmo em
Tema 1: El algoritmo EM
Sesión 4
Doctorado en Estadística
Facultad de Ciencias
Universidad de Valparaíso
1 Introduccion
2 Un ejemplo inspirador
3 El algortitmo EM
Introducción
Pr(X1 = x1 , X2 = x2 , X3 = x3 , X4 = x4 ) = g(x|θ),
es decir
x1 x2 x3 x4
n! 1 1 1 1 1 1 1
g(x|θ) = + θ − θ − θ θ .
x1 !x2 !x3 !x4 ! 2 4 4 4 4 4 4
donde n = x1 + x2 + x3 + x4 y 0 ≤ θ ≤ 1.
[email protected] IEUV Estadística computacional 15-10-2014 6/25
I II III IV El algoritmo EM
Estimación analítica
La función de log-verosimilitud es
∂ x1 x2 + x3 x4
l(θ) = − + .
∂θ 2+θ 1−θ θ
∂
Resolviendo el sitema
∂θ l(θ) = 0, lo cual equivale a la ecuación
cuadrátical∗ (θ) = nθ2 + (2x2 + 2x3 − x1 + x4 )θ − 2x4 = 0 y
despejando θ se obtiene θ.
el EVM de
p
−(2x2 + 2x3 − x1 + x4 ) + (2x2 + 2x3 − x1 + x4 )2 + 8nx4
θbM V = .
2n
Por lo tanto, para x = (x√1 , x2 , x3 , x4 )T = (125, 18, 20, 34)T , una
15+ 53809
estimación es θbM V = 394 = 0, 626821498.
[email protected] IEUV Estadística computacional 15-10-2014 7/25
I II III IV El algoritmo EM
library(maxLik)
x<-c(125,18,20,34)
LogLikTheta<- function(param)
{
theta<-param[1]
x[1]*log(2+theta)+(x[2]+x[3])*log(1-theta)+
x[4]*log(theta)
}
EVM <- maxLik(logLik = LogLikTheta, start = c(theta=0.5))
#summary(mle)
coef(EVM)
theta
0.6268215
[email protected] IEUV Estadística computacional 15-10-2014 8/25
I II III IV El algoritmo EM
197[θ(j) ]2 − 15θ(j) − 68
θ(j+1) = θ(j) − .
394θ(j) − 15
Por ejemplo,
197[θ(0) ]2 −15θ(0) −68 2 −15∗0,50−68
θ(1) = θ(0) − 394θ(0) −15 = 0, 50 − 197[0,50]
394∗0,50−15 = 0, 644230769
197[0,644230769]2 −15∗0,644230769−68
θ(2) = 0, 644230769 − 394∗0,644230769−15 = 0, 627071500
f (x, z|θ)
k(z|θ, x) = .
g(x|θ)
y la log-verosimilitud es
es decir,
log L(θ|x) = Eθ0 [log Lc (θ|x, Z)] − Eθ0 [log k(Z|θ, x)] .
| {z } | {z } | {z }
Datos obs. Datos completos Datos perdidos
Iteraciones
El algoritmo
y establecer m = m + 1.
Los parámetros que se encuentran en el paso M se usan para
comenzar el paso E siguiente, y así el proceso se repite. Es decir,
se ja el punto θb(m+1) = θb(m) .
[email protected] IEUV Estadística computacional 15-10-2014 16/25
Ejemplos del algortitmo EM
I II III IV El algoritmo EM
θx1
E(Z2 ) = .
θ+2
[email protected] IEUV Estadística computacional 15-10-2014 20/25
I II III IV El algoritmo EM
Ejemplo: La etapa E
log Lc (θ|x, Z) = log f (x, Z|θ) = (Z2 +x4 ) log(θ)+(x2 +x3 ) log(1−θ).
La esperanza sería
Eb
θ(m)
[log Lc (θ|x, Z)] = Eθb [(Z2 +x4 ) log(θ)+(x2 +x3 ) log(1−θ)],
(m)
Por lo tanto,
θ(m) x1
Q(θ|θb(m) , x) = log(θ) + x4 log(θ) + (x2 + x3 ) log(1 − θ),
θ(m) + 2
Ejemplo: la etapa M
θ(m) x1
∂Q(θ|θb(m) , x) θ(m) +2 + x4 x2 + x3
= − = 0.
∂θ θ 1−θ
Resolviendo la ecuación (despejando θ)
θ(m) x1
θ(m) +2 + x4
θ= θ(m) x1
θ(m) +2 + x2 + x3 + x4
Ejemplo: la estimación
{ 5 0.6267242