如何在R图中用用户定义的颜色填充箱形图？

library(ggplot2)

df <- data.frame(
  group = c("A", "A", "B", "B", "C", "C"),
  value = c(1, 2, 3, 4, 5, 6),
  color = c("red", "blue", "green", "orange", "purple", "pink")
)

# 创建图形对象，并设置数据映射
p <- ggplot(df, aes(x = group, y = value, fill = color))

# 创建箱形图并设置填充颜色
p + geom_boxplot() +
  scale_fill_manual(values = unique(df$color))

library(ggplot2)

df <- data.frame(
  group = c("A", "A", "B", "B", "C", "C"),
  value = c(1, 2, 3, 4, 5, 6),
  color = c("red", "blue", "green", "orange", "purple", "pink")
)

p <- ggplot(df, aes(x = group, y = value, fill = color))
p + geom_boxplot() +
  scale_fill_manual(values = unique(df$color)) +
  labs(title = "Boxplot with User-defined Colors",
       x = "Group", y = "Value") +
  theme_minimal()