在编织文档中插入占星器或表格

Question

> dput(head(t))
structure(list(Team = structure(c(1L, 1L, 1L, 1L, 1L, 1L), .Label = "Union", class = "factor"), 
    Date = structure(c(1L, 1L, 1L, 2L, 2L, 2L), .Label = c("2012-01-06", 
    "2012-02-06", "2012-03-06", "2012-04-06", "2012-05-06", "2012-07-06", 
    "2012-09-06", "2012-10-06", "2012-11-06", "2012-12-06"), class = "factor"), 
    STime = structure(c(1L, 1L, 1L, 1L, 1L, 1L), .Label = "07:03", class = "factor"), 
    ETime = structure(c(6L, 7L, 8L, 5L, 5L, 1L), .Label = c("01:13", 
    "03:13", "06:13", "09:13", "10:13", "11:13", "12:13", "13:13", 
    "15:13", "16:13", "18:13"), class = "factor")), .Names = c("Team", 
"Date", "STime", "ETime"), row.names = c(NA, 6L), class = "data.frame")

我希望能够使用占星器或xtable将此数据框架t放在针织表格式中。我是针织新手，我可以创建图形等，但无法成功地将表放入针织文档。

我的测试。到目前为止，RNW文件看起来像这样:

documentclass[11pt]{article}
begin{document}
<<setup, echo = FALSE, results= 'hide', message = FALSE>>=
data(mtcars)
library(ggplot2)
qplot(speed, dist, data = cars) + geom_smooth()
@
end{document}

我如何在这个文档中插入一个占星表来显示t数据帧的内容?

Answer 1

你的意思是这样的(results='asis')吗?

documentclass[11pt]{article}
begin{document}
<<setup, echo = FALSE, results= 'hide', message = FALSE>>=
data(mtcars)
library(ggplot2)
qplot(speed, dist, data = cars) + geom_smooth()
@

<<results='asis'>>=
require(stargazer)
stargazer(mtcars, summary = FALSE)
@
end{document}