Combined timeseries and climatology plots
pr_plot_tsclimate(df, Survey = "NRS", trans = "identity")
a combined plot
df <- pr_get_Indices(Survey = "CPR", Type = "P") %>%
dplyr::filter(Parameters == "PhytoAbundance_Cellsm3")
pr_plot_tsclimate(df, "CPR")
#> Warning: Removed 852 rows containing missing values or values outside the scale range
#> (`geom_line()`).
#> Warning: Removed 23314 rows containing missing values or values outside the scale range
#> (`geom_point()`).
#> Warning: Removed 31 rows containing missing values or values outside the scale range
#> (`geom_col()`).
#> Warning: Removed 67 rows containing missing values or values outside the scale range
#> (`geom_col()`).