here\'s my code:
ggplot2::ggplot(data = company_dat, ggplot2::aes(x = date, y = value, group = company, color = company)) + ggplot2::geom_line( ggpl