我感兴趣的是编写一个函数,它将数据框作为输入,并根据数据框中的信息通过knitr返回一个html页面作为输出。
这是我想写的函数的伪代码:
htmlOuput <- function(Df) {
newDf<-someManipulation(Df)
meltedDf<-melt(Df)
g<-ggplot(meltedDf)
return (html(g)) # This is the part that I am not sure about
}
有没有办法通过knitr输出html页面作为函数输出?
答案 0 :(得分:0)
答案 1 :(得分:0)
经过一番研究后,我发现调用rmarkdown文件在函数内呈现是最佳选择。
htmlOuput <- function(Df,meta = NULL, cacheable = NA) {
rmarkdown::render('./report.rmd',params=list(output_file = report.html))
}
report.rmd
将包含数据框的操作
newDf<-someManipulation(Df)
meltedDf<-melt(Df)
g<-ggplot(meltedDf)
g