同时使用ggplot进行分组和着色

如何解决同时使用ggplot进行分组和着色

我有两个团队，每个团队和年份在特定时间间隔内都有一个给定的值。我的数据如下所示：

yearID	团队ID	价值
2020	0	5
2020	1	7
2019	0	3
2019	1	1

我想用每一年的一个点和价值来绘制这个图，按颜色区分团队。 另外我想在按年份分组的点之间画线。我快到了：

ggplot(hr_by_team_year_sf_la_df,aes(x='yearID',y='HR',group='yearID')) + geom_line() + geom_point()

导致以下情节：

目前只有颜色缺失。我尝试了几种方法，但都没有成功：

1. ggplot(hr_by_team_year_sf_la_df,group='yearID')) + geom_line() + geom_point(aes(color='teamID'))
2. ggplot(hr_by_team_year_sf_la_df,group='yearID',color='teamID')) + geom_line() + geom_point()

有人知道如何根据 teamId 绘制点数吗？

解决方法

你的意思是这样吗？

library(tidyverse)

df <- tibble(yearID = c("2020","2020","2019","2019"),teamID = c(0,1,1),value = c(5,7,3,1)) %>% 
  mutate(teamID = as.factor(teamID))

ggplot(df) + 
  geom_line(aes(yearID,value)) + 
  geom_point(aes(yearID,value,color = teamID),size = 3)