long data format visualisations using gghighlight

[njtierney]

Some things like this where we split plots into facets based on features would be neat. Perhaps might be worthwhile to include a "gather_features()" or something function, to facilitate this.

library(gghighlight)
#> Loading required package: ggplot2
library(brolgar)
library(tidyverse)
wages_ts %>%
  features(ln_wages, feat_monotonic) %>%
  left_join(wages_ts, by = "id") %>%
  select(id:xp) %>%
  gather(key = "features",
         value = "inc_dec",
         - id,
         - unvary,
         - monotonic,
         - ln_wages,
         - xp) %>%
  filter(inc_dec) %>%
  ggplot(aes(x = xp,
             y = ln_wages,
             group = id)) + 
  geom_line() + 
  gghighlight() + 
  facet_wrap(~features)

^{Created on 2019-07-19 by the reprex package (v0.3.0)}