Time series plot of functional groups
pr_plot_tsfg(df, Scale = "Actual", Trend = "Raw")
plot of fg timseries
df <- pr_get_FuncGroups("NRS", "Phytoplankton") %>%
dplyr::filter(StationCode == 'PHB')
plot <- pr_plot_tsfg(df, "Actual", Trend = 'Raw')
plot
#> Warning: Removed 5 rows containing non-finite outside the scale range (`stat_align()`).