R ggplot2中使用组的不同颜色

我有一个问题，试图使用不同的颜色在我的绘图为两组。我为两组（mfin和ffin）在几年内创建了一个优势比图（包括95%CI）。使用下面的语法时，所有的点和线都是黑色的，我试图调整它们的尝试（例如，

geom_linerange（color=c（“红色”、“蓝色”））

失败（错误：设置美学的长度不兼容：color）

有人能帮我吗

ggplot(rbind(data.frame(mfin, group=mfin), data.frame(ffin, group=ffin)), 
           aes(x = JAAR, y = ror, ymin = llror, ymax = ulror)) + 
geom_linerange() + 
geom_point() +
geom_hline(yintercept = 1) + 
ylab("Odds ratio & 95% CI") + 
xlab("") + 
geom_errorbar(width=0.2)

以下是一些样本数据（第一组=mfin，@ND组+ffin）

JAAR ror llror ulror

2008 2.00 1.49 2.51

2009年2.01 1.57 2.59

2010年2月06日1月55日2月56日

2011年2月07日1月56日2月58日

2012年2月19日1.70 2.69

2013年2月23日1.73 2.72

2014年2月20日1.71 2.69

2015年2月31日1月84日2月78日

2016.230 1.83 2.76

JAAR ror llror ulror

2008年1.36 0.88 1.84

2009年1.20 0.73 1.68

2010年1.16 0.68 1.64

2011年1月23日0.77 1.69

2012年1月43日1.00 1.86

2013年1月46日1月04日1月88日

2014年1月49日1月07日1月90日

2015 1.30 0.89 1.70

---

2016 1.29 0.89 1.70

您需要将集团成员变量映射到

颜色

美学（在数据的长版本中）：

这产生了我认为您正在寻找的东西，除了模拟数据让它看起来有些混乱：

---

您需要将组成员身份变量映射到

颜色

美学（在数据的长版本中）：

这产生了我认为您正在寻找的东西，除了模拟数据让它看起来有些混乱：

---

您能提供一些示例数据吗？欢迎来到Stack Overflow！没有示例代码很难，但您是否尝试将color=group添加到aes字符串中？能否提供一些示例数据？欢迎使用堆栈溢出！没有示例代码很难，但您是否尝试将color=group添加到aes字符串中？

library(readr)
library(dplyr)
library(ggplot2)

# simulate some data
year_min = 1985
year_max = 2016
num_years = year_max - year_min + 1
num_groups = 2
num_estimates = num_years*num_groups

df_foo = data_frame(
  upper_limit = runif(n = num_estimates, min = -20, max = 20),
  lower_limit = upper_limit - runif(n = num_estimates, min = 0, max = 5),
  point_estimate = runif(num_estimates, min = lower_limit, max = upper_limit),
  year = rep(seq(year_min, year_max), num_groups),
  group = rep(c("mfin", "ffin"), each = num_years)
)

# plot the confidence intervals
df_foo %>% 
  ggplot(aes(x = year, y = point_estimate, 
             ymin = lower_limit, ymax = upper_limit,
             color = group)) + 
  geom_point() + 
  geom_errorbar() + 
  theme_bw() + 
  ylab("Odds Ratio & 95% CI") + 
  xlab("Year") + 
  scale_color_discrete(name = "Group")