添加本机knitr打印方法
我正在寻找一种调整函数的方法,这些函数通常在查看器或浏览器中显示html表,在调用时,它们会自动将html插入knitr文档(如rnotebooks) 具体来说,我想更改包中函数的行为方式。此时,它们返回一个具有添加本机knitr打印方法,r,knitr,rnotebook,R,Knitr,Rnotebook,我正在寻找一种调整函数的方法,这些函数通常在查看器或浏览器中显示html表,在调用时,它们会自动将html插入knitr文档(如rnotebooks) 具体来说,我想更改包中函数的行为方式。此时,它们返回一个具有$knitr属性的对象,该属性必须手动插入,然后在查看器中生成一个html表: `r sjt.frq(efc$e42dep, no.output=TRUE)$knitr` 这些功能之一是。有办法做到这一点吗?来自: 当我编织文档时,它可以工作,但不适用于RNotebooks,也不适用于
$knitr
属性的对象,该属性必须手动插入,然后在查看器中生成一个html表:
`r sjt.frq(efc$e42dep, no.output=TRUE)$knitr`
这些功能之一是。有办法做到这一点吗?来自:
当我编织文档时,它可以工作,但不适用于RNotebooks,也不适用于sjt.frq
。但是,RNotebook适用于以下声明:
library(sjPlot)
library(sjmisc)
library(knitr)
data(efc)
asis_output(sjt.frq(efc$e42dep, no.output=TRUE)$knitr)
我的经验是,最好获得字符输出,并将其包装在
asis\u输出中well@Benjamin你是说$output.用“字符输出”来完成?我不熟悉这个对象。您需要一个HTML代码的字符串。将字符串放入asis\u输出
与使用块选项output='asis'
将同一字符串放入cat
是一样的。您知道这样一个例子吗?我只是查了一下DT::datadable
,如果我正确理解了代码,它们就依赖于htmlwidgets
:htmlwidgets::createWidget(“数据表”,if(hiddedatable)NULL-else参数,package=“DT”,width=width,height=height,elementId=elementId,sizingPolicy=htmlwidgets::sizingPolicy(knitr.figure=FALSE,knitr.defaultWidth=“100%”,knitr.defaultHeight=“auto”),dependencies=deps,preRenderHook=function(实例){data=instance[[“x”]][[“data”]]]。。。。
library(sjPlot)
library(sjmisc)
library(knitr)
data(efc)
asis_output(sjt.frq(efc$e42dep, no.output=TRUE)$knitr)