如何在R图中获得正确的Pie节点？

# 导入ggplot2包
library(ggplot2)

# 导入数据
data <- read.csv("data.csv")

# 创建柱状图
bar_plot <- ggplot(data, aes(x = category, y = value)) +
  geom_bar(stat = "identity") +
  labs(title = "Pie Chart", x = "Category", y = "Value")

# 将柱状图转换为饼图
pie_plot <- bar_plot + coord_polar(theta = "y")

# 设置饼图颜色
pie_plot <- pie_plot + scale_fill_manual(values = c("#FF0000", "#00FF00", "#0000FF"))

# 设置图表主题样式
pie_plot <- pie_plot + theme(plot.background = element_rect(fill = "white"),
                             panel.background = element_rect(fill = "white"),
                             axis.text = element_text(size = 12),
                             axis.title = element_text(size = 14, face = "bold"))

# 显示饼图
print(pie_plot)