自定义条形边框颜色的R语言代码示例

自定义条形边框颜色的R语言代码示例

以下是一段R语言代码，用于自定义条形边框的颜色。你可以根据自己的需求修改和调整代码，以实现所需的效果。

# 导入ggplot2包
library(ggplot2)

# 创建一个数据框
data <- data.frame(
  category = c("A", "B", "C", "D"),
  value = c(10, 8, 6, 4)
)

# 创建一个基础条形图
p <- ggplot(data, aes(x = category, y = value, fill = category)) +
  geom_bar(stat = "identity")

# 自定义条形边框颜色
border_color <- "blue"  # 设置边框颜色为蓝色

# 修改条形边框的颜色
p <- p + theme(
  panel.border = element_rect(color = border_color, fill = NA),  # 设置条形边框颜色
  axis.line = element_line(color = "black"),  # 设置坐标轴线颜色为黑色
  strip.background = element_blank(),  # 设置分组标签背景为空白
  strip.text = element_text(color &