Peter Dalgaard <p.dalgaard <at> biostat.ku.dk> writes: : : I bumped into the following situation: : : Browse[1]> coef : deg0NA deg4NA deg8NA deg0NP deg4NP deg8NP : (Intercept) 462 510 528 492 660 762 : Browse[1]> coef[,1] : [1] 462 : Browse[1]> coef[,1,drop=F] : deg0NA : (Intercept) 462 : : where I really wanted neither, but : : (Intercept) : 462 : : Anyone happen to know a neat way out of the conundrum? : : I can think of : : rowSums(coef[,1,drop=F]) : : or of course : : val <- coef[,1] : names(val) <- rownames(x)) : : but the first one is sneaky and the second gets a bit tedious... :
If by tedious you mean its not a single expression then the basic idea of your solution #2 can be preserved while doing it in a single expression like this: structure(coef[,1], .Names = rownames(x)) ______________________________________________ R-devel@stat.math.ethz.ch mailing list https://stat.ethz.ch/mailman/listinfo/r-devel