[R] "xtable" results doesn't correspond to data.frame

[Stefan Grosse]

That table below is not the table from your first mail.

However I would do something like:

library(xtable)
testdata<-data.frame(gender=c(rep("male",3),rep("female",4))
testtab<-as.data.frame(table(testdata))
pct<-function(x){
  x/sum(x)*100
  }
testtab$percent<-pct(testtab$Freq)

rownames(testtab)<-c(1,2)
colnames(testtab)<-c("gender","Freq","%")

#it looks like:

testtab

#and latex:

xtable(testtab,digits=2)

% latex table generated in R 2.5.0 by xtable 1.4-6 package
% Wed Jun 20 18:25:22 2007
\begin{table}[ht]
\begin{center}
\begin{tabular}{rlrr}
  \hline
 & gender & Freq & \% \\
  \hline
1 & female &   3 & 42.86 \\
  2 & male &   4 & 57.14 \\
   \hline
\end{tabular}
\end{center}
\end{table}

I hope this is now how expected.

Cheers
Stefan

-------- Original Message  --------
Subject: Re:[R] "xtable" results doesn't correspond to data.frame
From: Vumani Dlamini <dvumani at hotmail.com>
To: singularitaet at gmx.net
Date: Wed Jun 20 2007 13:22:59 GMT+0200
> This is what is not expected. Having "Gender" repeated twice and the
> labels for gender missing. Will format the digits and align once
> everything is right.
> Thanks.
>
>
> \begin{table}[ht]
> \begin{center}
> \begin{tabular}{llrr}
>  \hline
>  &   & number of patients & \% \\
>  \hline
> Gender & Gender &   &   \\
>    &   & 3 & 0.428571428571429 \\
>    &   & 4 & 0.571428571428571 \\
>   \hline
> \end{tabular}
> \end{center}
> \