library(ggpmisc) ggplot(Table, aes(x = Date, y = Value, group = Group)) + geom_line(size = 0.2) + scale_y_continuous("Value") + scale_x_date(&qu