Displaying 1 result from an estimated 1 matches for "sxfixs".
Did you mean:
fixs
2010 Mar 27
1
R runs in a usual way, but simulations are not performed
...too complicated. I am convinced that of foremost importance is
the last repeat command. Thank you very much. Faithfully yours, Martin
Bo?a (Matej Bel University / Faculty of Natural Sciences / Bansk?
Bystrica / Slovakia).
# zav?dza s?riu podporn?ch funkci?
# zav?dza trace, sigma, fi, xs, xs, fixs, sxfixs
tr <- function(M) sum(diag(M))
sigma_ADD <- function(alpha) diag(as.vector(alpha %*% t(z)),
nrow=nrow(z), ncol=nrow(z))
sigma_MIX <- function(alpha) diag((as.vector(alpha %*% t(z)))^2,
nrow=nrow(z), ncol=nrow(z))
sigma_EXP <- function(alpha) diag(exp(as.vector(alpha %*% t(z))),
nrow=nr...