使用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

非常简单：sort（）不返回表，而是返回数组。使用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)