res1<- xtabs(X3~X1+X2,data=Dat) res1 # X2 #X1 1 2 3 4 # A 11 12 13 14 # B 15 16 17 18 # C 19 20 21 0 library(reshape2) dcast(Dat,X1~X2,value.var="X3") # X1 1 2 3 4 #1 A 11 12 13 14 #2 B 15 16 17 18 #3 C 19 20 21 NA A.K.
Hello again, let say I have following data-frame: > Dat <- data.frame(c(rep(c("A", "B"), each = 4), "C", "C", "C"), c(rep(1:4, 2), 1, 2, 3), 11:21) > colnames(Dat) <- c("X1", "X2", "X3") > Dat X1 X2 X3 1 A 1 11 2 A 2 12 3 A 3 13 4 A 4 14 5 B 1 15 6 B 2 16 7 B 3 17 8 B 4 18 9 C 1 19 10 C 2 20 11 C 3 21 Now I want to put that data-frame in the following form: > Dat1 <- rbind(c(11,12,13,14), c(15,16,17,18), c(19,20,21, NA)); colnames(Dat1) <- c(1,2,3,4); rownames(Dat1) <- c("A", "B", "C") > Dat1 1 2 3 4 A 11 12 13 14 B 15 16 17 18 C 19 20 21 NA Basically, 'Dat' is the melted form of 'Dat1' Can somebody point me any R function for doing that? Thanks for your help. ______________________________________________ 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.