[R] style question

[Sebastián Daza]

Hi everyone,
I am trying to build a table putting standard errors horizontally. I 
haven't been able to do it.

library(memisc)
berkeley <- aggregate(Table(Admit,Freq)~.,data=UCBAdmissions)

berk0 <- glm(cbind(Admitted,Rejected)~1,data=berkeley,family="binomial")
berk1 <- 
glm(cbind(Admitted,Rejected)~Gender,data=berkeley,family="binomial")
berk2 <- 
glm(cbind(Admitted,Rejected)~Gender+Dept,data=berkeley,family="binomial")

setCoefTemplate(est.se=c(est = "($est:#)($se:#)"))

mtable(berk0,berk1,berk2,
+         coef.style="est.se",
+         summary.stats=c("Deviance","AIC","N"))
Error in dim(ans) <- newdims :
   dims [product 1] do not match the length of object [2]

Thank you in advance.

-- 
Sebastián Daza
sebastian.daza at gmail.com