Plot temporal Trends in plankton data
pr_plot_Trends(df, Trend = "Raw", method = "lm", trans = "identity")
a timeseries plot
df <- pr_get_Indices("NRS", "Zooplankton") %>%
dplyr::filter(Parameters == "Biomass_mgm3") %>%
pr_model_data()
pr_plot_Trends(df, method = "loess", Trend = "Month")
#> Warning: prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
#> Warning: Removed 19 rows containing missing values or values outside the scale range
#> (`geom_point()`).
#> Warning: no non-missing arguments to max; returning -Inf
pr_plot_Trends(df, Trend = "Year")
#> Warning: Removed 8 rows containing non-finite outside the scale range (`stat_smooth()`).
#> Warning: Removed 9 rows containing missing values or values outside the scale range
#> (`geom_point()`).
pr_plot_Trends(df, Trend = "Raw")
#> Warning: Removed 62 rows containing non-finite outside the scale range
#> (`stat_smooth()`).
#> Warning: Removed 65 rows containing missing values or values outside the scale range
#> (`geom_point()`).