Hi jpm miao, You can get CSV files that can be imported into Excel like this:
library(prettyR) sink("excel_table1.csv") delim.table(table(df[,c("y","z")])) sink() sink("excel_table2.csv") delim.table(as.data.frame(table(df[,c("y","z")])),label="") sink() sink("excel_table3.csv") delim.table(as.matrix(table(df[,c("y","z")])),label="") sink() Jim On Wed, Apr 27, 2016 at 8:35 AM, jpm miao <miao...@gmail.com> wrote: > Hi, > > How could we print the frequency table (produced by "table") to an Excel > file? > Is there an easy way to do so? Thanks, > > Miao > >> df <- data.frame(x = 1:3, y = 3:1, z = letters[1:3]) > >> table(df[,c("y","z")]) > z > y a b c > 1 0 0 1 > 2 0 1 0 > 3 1 0 0 >> test<-table(df[,c("y","z")]) >> as.data.frame(test) > y z Freq > 1 1 a 0 > 2 2 a 0 > 3 3 a 1 > 4 1 b 0 > 5 2 b 1 > 6 3 b 0 > 7 1 c 1 > 8 2 c 0 > 9 3 c 0 >> as.matrix(test) > z > y a b c > 1 0 0 1 > 2 0 1 0 > 3 1 0 0 >> testm<-as.matrix(test) >> testm > z > y a b c > 1 0 0 1 > 2 0 1 0 > 3 1 0 0 >> typeof(testm) > [1] "integer" > > [[alternative HTML version deleted]] > > ______________________________________________ > R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see > 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. ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see 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.