n = 1000
ymat = cbind(rexp(n), rexp(n))
plot(ymat)
fit = vglm(ymat ~ 1, fam=gumbelIbiv, trace=TRUE)
fit = vglm(ymat ~ 1, fam=gumbelIbiv, trace=TRUE, crit="coef")
coef(fit, matrix=TRUE)
Coef(fit)
fitted(fit)[1:5,]
Run the code above in your browser using DataLab