[R] How to print the frequency table (produced by the command "table" to Excel

[Jim Lemon]

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 <miaojpm at 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 at 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.