如何用R中的ChartJSRadar保存为png？

Question

我正在尝试保存分辨率为300的地块以用于发布。 使用png设备保存图的常用方法不起作用，并保存空白png。 还有其他我可以尝试的东西，还是其他类似的软件包？

library(radarchart)
data<-data.frame(Field=c("Age","Sex","Submission"), y=sample(1:100,3), x=sample(1:100,3))
path<-"C:\\Desktop\\R\\"
png(file=paste0(path,"Radar",".png"), width=500, height=500, res=300)
plot<-chartJSRadar(scores=data,  labelSize= 10, main="Completeness Radar", maxScale = 100)
print(plot)
dev.off()

我也尝试过：

png(file=paste0(path,"Radar",".png"), width=500, height=500, res=300)
chartJSRadar(scores=data,  labelSize= 10, main="Completeness Radar", maxScale = 100)
dev.off()

Answer 1

library(radarchart)
library(webshot)
library(htmlwidgets)

dat <- data.frame(
  Field = c("Age","Sex","Submission"), 
  y = sample(1:100,3), 
  x = sample(1:100,3)
)

plt <- chartJSRadar(
  scores = dat,
  labelSize= 10, 
  main="Completeness Radar", 
  maxScale = 100
)

saveWidget(plt, "plt.html")

webshot("plt.html")

magick::image_read("webshot.png")

• 雷达图对人们来说很难
• data和plot是suberbad变量名称
• 空格是你的朋友
• webshot可以限制目标区域
• 各种magick （）可以裁剪目标区域
• 考虑使用http://www.ggplot2-exts.org/ggradar.html