r - ggRadar - 如何更改绘图线粗细和网格线粗细？

Question

虽然我有几个问题，但我一直在使用 ggiraphExtra 包中的 ggRadar 函数。即如何改变线条粗细和背景网格线粗细。

我曾尝试使用 geom_line 更改线条粗细但无济于事，因为它不会与所有线条交互。我尝试过使用主题(axis.etc)，但无法以任何方式与网格线(背景圆圈)交互。

这是一个 super 简单的例子:

library(ggiraphExtra)
library(ggplot2)

data = as.data.frame(rbind(c(7,12,17,9))) 

ggRadar(data, rescale = F, size=3)+
  ylim(0,20)+
  geom_line(size=2)

如有任何帮助，我们将不胜感激。

谢谢!

Answer 1

您可以使用 theme 中的 panel.gridline.major 轻松修改网格线。改变线条的粗细有点困难，但仍然是可能的。

p <- ggRadar(data, rescale = F, size = 4) +
  ylim(0,20) +
  theme(panel.grid.major = element_line(size = 2))
plot_obj <- ggplot_build(p)
plot_obj$data[[1]]$size <- 2
grid::grid.newpage()
grid::grid.draw(ggplot_gtable(plot_obj))

原剧情:

修改(丑陋，但证明了这一点)。