xtable目前还不知道如何从base::table打印频率表。我现在所做的是将其转换为数据格式,然后根据需要使用colnames更改标题:
dset <- data.frame(rpois(100, 1))
dset.print <- as.data.frame(table(dset))
colnames(dset.print) <- c("smth", "freq")
xtable(dset.print)现在,我想要的是按行打印这个表(比如table(dset)的实际输出,标题在前面)。我试过这样的方法
dset.print <- t(as.matrix(table(dset)))
dset.print <- cbind(c("smth", "freq"), as.data.frame(dset.print))但这并没有给出我想要的。
发布于 2016-10-24 14:51:23
这看起来很不错,如果你正在编织PDF。如果您正在编织MS Word或HTML,请指定打印(dset.xtab,type="html"),您可能不会觉得它们的美观很好。
```{r xtable, echo=FALSE, message=FALSE, warning=FALSE, results='asis'}图书馆(Xtable)
dset <- data.frame(rpois(100,1))
dset.print <- as.data.frame(表(Dset))
dset.print <- rbind.data.frame(as.character(dset.print,1),dset.print,2)
名称(dset.print) <- rep('',ncol(dset.print))
行名(dset.print) <- c('smth','freq')
dset.xtab <- xtable(dset.print)
打印(dset.xtab)
https://stackoverflow.com/questions/40220170
复制相似问题