编织和报告工具

杰西卡·l·拉森和加布里埃尔·贝克尔

我们可以同时使用knitr和ReportingTools,就像我们的基本插图中的这个非常简单的示例所示。

在这里,我们将创建一个简单的集成报表ReportingTools报告能力与针织。

要构建此报告,只需调用knit2html功能从针织包装。

我的。df < - data.frame (EGID = c(“103”、“104”、“105”、“106”、“107”),RPKM = c(4、5、3、100、75),德= c(“是的”、“是”、“否”、“不”、“没有”))图书馆(ReportingTools)

现在,我们可以通过使用knitrHandlers将数据帧发布为表。当使用knitrHandlers时,我们必须将目的地位置指定为直接指定给knitrHandlers构造函数的参数,或者当在handlers参数中指定了knitrHandlers时,将目的地位置指定为HTMLReport的附加参数。

我们不调用finish,因为我们仍然会将输出添加到我们的针织报告中。

library(XML) instDoc <- file.path("..", "inst", "doc") htmlRep <- HTMLReport(shortName = "knitrReport", handlers=knitrHandlers, reportDirectory = instDoc)

#发布(我。htmlRep[["mydf"]]<-my. df, htmlRep)这条线相当于上面的线
EGID RPKM
EGID RPKM
103 4 是的
104 5 是的
105 3. 没有
106 One hundred. 没有
107 75 没有
EGIDRPKM德

因此,我们能够将ReportingTools生成的表直接包含在knitr文档中。

现在我们试着放入一个图像:

library(lattice) set.seed(123) htmlRep[["pic"]] = xyplot(y~x, data = data.frame(y=rnorm(25), x=rnorm(25)))
figuresknitrReport / knitrreport - 59999. png
##我们也可以添加这样的图片:y <- rnorm(500) pic2<-histogram(y, main="Sample of 500 observations from a Normal (0,1)") publish(pic2, htmlRep)
figuresknitrReport / knitrreport - 72776. png

要构建报告,只需调用knit2html功能从针织包装。

正如我们所看到的,将ReportingTools与knitr结合使用非常简单,只需选择一组不同的reportthandlers(在本例中是由knitrHandlers构造函数生成的),并确保最终HTML文件的位置与reportthandlers对象的位置字段指定的位置相匹配(直到目录)。

这允许我们创建丰富的基于编织的报告和小插图,同时利用ReportingTools的功能来格式化和显示生成的R对象。