Displaying 1 result from an estimated 1 matches for "xfast".
Did you mean:
fast
2007 Feb 17
1
Solve in maximum likelihood estimation
...t <- matrix(ncol=no.obs,nrow=no.obs)
P <- Pminus <- array(dim=c(no.state,no.state,n))
Pfast <- Pfastmin <- matrix(NA,ncol=no.state,nrow=no.state)
K <- array(dim=c(no.state,no.obs,n))
Kfast <- matrix(nrow=no.state,ncol=no.obs)
X <- Xhatminus <- array(dim=c(no.state,1,n))
Xfast <- Xfastmin <- matrix(ncol=1,nrow=no.state)
v <- array(dim=c(no.obs,1,n))
vfast <- matrix(nrow=no.obs,ncol=1)
Y <- matrix(ncol=1,nrow=no.obs)
log.lik <- numeric(n)
Rprof()
kalman <- function(a)
{...