这是我第一次在这里发布问题，希望它能正常工作！

我正在构建甜甜圈图。多亏了几个网站的帮助，我才得以绘制它。但是，有一个我不知道如何解决的问题... R要求我使用离散值。因此，我使用factor（variable）使其起作用，但现在它在图例中弹出，并且我希望它在没有该信息的情况下出现（仅HG，没有factor（HG）且没有a）。请在下面找到使用的代码，并附上一张图形外观的图片。

任何关于如何摆脱它的想法将不胜感激。

ggplot(test,aes(ymax=ymax,ymin=ymin,xmax=4,xmin=3,fill=factor(HG))) +
  geom_rect() +
  geom_text(x=4.2,aes(y=labelPosition,label=label,color=factor(HG)),size=4) + 
  scale_fill_manual(values=colores) +
  scale_color_manual(values=colores2) +
  coord_polar(theta="y") +
  xlim(c(1.5,4)) +
  theme_void() +
  theme(legend.position = "right") +
  ggtitle('TSI per HG') +
  theme(plot.title = element_text(hjust = 0.5))*