用xtable排序乳胶输出表

Question

我试图生成一个排序表并输出到latex中。但是，它似乎xtable无法应付排序表。建议？

a<-sample(letters,500,replace=T) 
    b<-table(a) 
    c<-sort(table(a),decreasing=T) 
    xtable(b) 
    xtable(c) 

//中号

Answer 1

很简单：排序（）不返回一个表，而是一个数组。使用as.table（）来解决你的问题：

a<-sample(letters,500,replace=T) 
b<-table(a) 
class(b) 
c<-sort(table(a),decreasing=T) 
class(c) 
d <- as.table(c) 
class(d) 
xtable(d)