From c74407e26c76f094433da3b66284f63ec860bbaa Mon Sep 17 00:00:00 2001
From: lilyclements <lily@idems.international>
Date: Thu, 20 Jun 2024 18:40:43 +0100
Subject: [PATCH] consistent variable names

---
 R/crops_definitions.R | 1 +
 1 file changed, 1 insertion(+)

diff --git a/R/crops_definitions.R b/R/crops_definitions.R
index ef5fd91..15bfa20 100644
--- a/R/crops_definitions.R
+++ b/R/crops_definitions.R
@@ -170,6 +170,7 @@ crops_definitions <- function(data = NULL, date_time = NULL, station = NULL, rai
     df <- df %>% dplyr::summarise(prop_success = sum(overall_cond, 
                                                      na.rm = TRUE)/length(stats::na.omit(overall_cond)))
     df$prop_success <- round(df$prop_success, 2)
+    df <- df %>% dplyr::select(c(station, rain_total = water_requirements, plant_day = planting_day, plant_length = planting_length, prop_success = prop_success))
     return(df)
   }
 }
\ No newline at end of file