I am trying to create a line plot with ggplot by group, but I get two legends. I managed to edit the first legend to be as I want, but I cannot get rid of the second one. How can I keep only the legend I need?
My code is as follows:
ggplot(data=data_Frame, aes(x=year, y=percent, group=legal, colour=as.factor(legal))) +
geom_line(aes(linetype=as.factor(legal)))+
geom_point()+
geom_label_repel(aes(label = scales::percent(round(percent, digits=2))), nudge_x = 0.35, size = 3)+
labs(y= "% of total cases",
x = "Year",
title="Evolution of legal activity") +
theme_classic()+
scale_color_discrete(name = "Legality",
labels = c("Legal", "Not legal"))
and my dataset is as follows:
structure(list(year = c(2013, 2014, 2014, 2015, 2015, 2016, 2016,
2017, 2017, 2018, 2018, 2019, 2019, 2020, 2020, 2021, 2021, 2022,
2022), legal = c(0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1,
0, 1, 0, 1), local = c("yes", "yes", "yes", "yes", "yes", "yes",
"yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes",
"yes", "yes", "yes", "yes"), percent = c(0.0833116184157648,
0.134483022523174, 0.231061069599069, 0.0560278636136179, 0.272460808191276,
0.10522051542274, 0.0823949547509575, 0.0902594024920258, 0.173996656575591,
0.171213948427101, 0.331143680934122, 0.136188084988968, 0.219662510799276,
0.0968133762744133, 0.216020359140314, 0.0929078672288155, 0.181961094549172,
0.0871273239449852, 0.0913038796855186)), row.names = c(NA, -19L
), class = "data.frame")
>Solution :
You can simply add show.legend = FALSE in your geom_line:
ggplot(data = data_Frame, aes(x=year, y=percent, group=legal, colour=as.factor(legal))) +
geom_line(aes(linetype = as.factor(legal)), show.legend = FALSE) +
geom_point()+
ggrepel::geom_label_repel(aes(label = scales::percent(round(percent, digits=2))), nudge_x = 0.35, size = 3)+
labs(y= "% of total cases",
x = "Year",
title="Evolution of legal activity") +
theme_classic()+
scale_color_discrete(name = "Legality",
labels = c("Legal", "Not legal"))
