jim holtman schrieb:
Try this:

key <- rownames(a)
key[key == "AT"] <- "TA"
do.call(rbind, by(a, key, colSums))
something like

paste(sort(strsplit(key, split="")[[1]]), "")

might be more general.

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to