总结:我的最终目标是使用rCharts
,特别是Highcharts
,作为ReporteRs
PowerPoint 报告自动化工作流程的一部分。我想使用的图表之一在 Rstudio 的查看器窗格中呈现为 html,并且addPlot(function() print(myChart))
不会将其添加到 PowerPoint。作为一种解决方法,我决定尝试保存myChart
到磁盘,这样我就可以将它添加到 PowerPoint 中。
所以我的问题是,如何将我的 html 图像放入我的ReporteRs
工作流程中?要么将它保存到磁盘,要么让它可读,ReporteRs
可以解决我的问题。
这个问题和这个问题真的一样,但我正在使用,特别是这里rCharts
找到的例子:
#if the packages are not already installed
install.packages('devtools')
require(devtools)
install_github('rCharts', 'ramnathv')
#code creates a radar chart using Highcharts
library(rCharts)
#create dummy dataframe with number ranging from 0 to 1
df<-data.frame(id=c("a","b","c","d","e"),val1=runif(5,0,1),val2=runif(5,0,1))
#muliply number by 100 to get percentage
df[,-1]<-df[,-1]*100
myChart <- Highcharts$new()
myChart$chart(polar = TRUE, type = "line",height=500)
myChart$xAxis(categories=df$id, tickmarkPlacement= 'on', lineWidth= 0)
myChart$yAxis(gridLineInterpolation= 'circle', lineWidth= 0, min= 0,max=100,endOnTick=T,tickInterval=10)
myChart$series(data = df[,"val1"],name = "Series 1", pointPlacement="on")
myChart$series(data = df[,"val2"],name = "Series 2", pointPlacement="on")
myChart
所以如果我尝试
> png(filename="~/Documents/name.png")
> plot(myChart)
Error in as.double(y) :
cannot coerce type 'S4' to vector of type 'double'
> dev.off()
我得到那个错误。
我查看了Highcharts 文档,以及许多 其他 似乎 依赖于 Javascript 和. 如果您的答案依赖于,请假设我不知道如何使用它。是我发现的另一个包,它甚至包含一个函数,但据我所知,它要求您首先将输出转换为对象。phantomjs
phantomjs
webshot
install_phantomjs()
Shiny
我的问题实际上是这个的副本,这不是这个的副本,因为那是如何将 html 输出嵌入到 Rmarkdown 中,而不是将其保存为硬盘驱动器上的文件。
我还发现这个未回答的问题也基本相同。
编辑:正如@hrbrmstr 和其他许多人所指出的,雷达图并不总是最好的可视化工具。我发现自己需要为这份报告制作一份。