如何在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变量名称
• whitespace是你的bff
• webshot可以限制目标区域
• 各种magickƒ（）s可以裁剪目标区域
• 考虑使用http://www.ggplot2-exts.org/ggradar.html