You can use geom_text
with the option parse = TRUE
to add symbols as labels.
Assuming that you want alpha where SO = A1 and beta where SO = B1, something like this:
library(dplyr)
library(ggplot2)
df %>%
mutate(label = ifelse(SO == "A1", "alpha", "beta")) %>%
ggplot(aes(N, Value)) +
geom_line(aes(colour = SO)) +
geom_text(aes(label = label), parse = TRUE)
Result:
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…