From 62c7e3e9439de8a84ceedbc0c627690a48cc62a3 Mon Sep 17 00:00:00 2001
From: Mattia Greco <mattia_greco@outlook.com>
Date: Sat, 2 Mar 2024 09:51:14 +0100
Subject: [PATCH] modify plot fun

---
 R/plot_record_by_depth.R  | 2 +-
 R/plot_record_by_season.R | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/plot_record_by_depth.R b/R/plot_record_by_depth.R
index 7236bfd..e678204 100644
--- a/R/plot_record_by_depth.R
+++ b/R/plot_record_by_depth.R
@@ -10,7 +10,7 @@
 #' @import tidyr
 #' @import rlang
 #' @importFrom stats reorder
-#' 
+
 plot_record_by_depth <- function(data) {
   if (get_data_type(data) %in% c("CPR North","CPR South","Sediment trap","Pump")) {
     stop("This function is designed to work only with Net data", call. = FALSE) 
diff --git a/R/plot_record_by_season.R b/R/plot_record_by_season.R
index 9c48879..43ec49e 100644
--- a/R/plot_record_by_season.R
+++ b/R/plot_record_by_season.R
@@ -8,7 +8,7 @@
 #' @import ggplot2
 #' @import dplyr
 #' @import rlang
-#' 
+ 
 plot_record_by_season <- function(data) {
   if (get_data_type(data)=="Sediment trap"){
     data$sampling_month=as.numeric(sub("^\\d{2}/(\\d{2})/\\d{4}$", "\\1",