如何调整ggplot2雷达图：移除最外圈及将中间线条改为白色背景

针对你提出的两个需求，直接在现有代码的theme()配置中添加对应设置即可解决：

核心调整点 #

• 移除雷达图最外圈：通过隐藏x轴刻度文字及所有刻度线实现，因为极坐标的外圈本质是x轴的刻度线载体
• 去除中间线条并统一白色背景：清除所有网格线，同时明确设置绘图背景为白色，和全局背景保持一致

修改后的完整代码 #

plot = ggplot(data = RiskPlot, aes(x=substr(Types,1,1), y = Risk_Value, fill = Types)) +
      geom_bar(stat = "identity")+
      theme_minimal()+
      theme( text = element_text(size = 35),
             panel.border = element_blank(),
             panel.background = element_blank(),
             plot.background = element_rect(fill = "white", color = NA), # 统一白色绘图背景
             axis.title = element_blank(),
             axis.text.y = element_blank(),
             axis.text.x = element_blank(), # 移除x轴刻度文字，消除外圈线条
             axis.ticks = element_blank(), # 移除所有刻度线
             panel.grid = element_blank(), # 清除中间所有网格线条
             legend.text=element_text(size=25),
             legend.position = "left") +
      coord_polar(start =0) +
      ylim(-1,3) +
      annotate(
        x = .5, 
        y = 1, 
        label = "Low", 
        geom = "text",
        size = 10
      ) +
      annotate(
        x = .5, 
        y = 3, 
        label = "High", 
        geom = "text",
        size = 10
      ) + guides(fill=guide_legend(title=NULL))

补充说明 #

如果你的绘图环境默认背景就是白色，plot.background可以省略，但添加后能确保在任何环境下背景显示一致；panel.grid = element_blank()会清除极坐标下的径向和环形网格线，彻底让中间区域变为空白白色。

内容的提问来源于stack exchange，提问作者PMaier