Pau*_*yuk 4 reporting r presentation sweave
如果我有以下数据框称为结果
> result
Name CV LCB UCB
1 within 2.768443 1.869964 5.303702
2 between 4.733483 2.123816 18.551051
3 total 5.483625 3.590745 18.772389
> dput(result,"")
structure(list(Name = structure(c("within", "between", "total"
), .rk.invalid.fields = list(), .Label = character(0)), CV = c(2.768443,
4.733483, 5.483625), LCB = c(1.869964, 2.123816, 3.590745), UCB = c(5.303702,
18.551051, 18.772389)), .Names = c("Name", "CV", "LCB", "UCB"
), row.names = c(NA, 3L), class = "data.frame")
Run Code Online (Sandbox Code Playgroud)
很好地呈现这些数据的最佳方法是什么?理想情况下,我想要一个可以粘贴到报告中的图像文件,或者可能是一个表示该表的HTML文件?
设定有效数字的额外点数.
我会用xtable.我通常用它和Sweave一起使用.
library(xtable)
d <- data.frame(letter=LETTERS, index=rnorm(52))
d.table <- xtable(d[1:5,])
print(d.table,type="html")
Run Code Online (Sandbox Code Playgroud)
如果你想在Sweave文档中使用它,你会像这样使用它:
<<label=tab1,echo=FALSE,results=tex>>=
xtable(d, caption = "Here is my caption", label = "tab:one",caption.placement = "top")
@
Run Code Online (Sandbox Code Playgroud)