From 12055b52dcc4e7b27dd5229926e976a48d5a52c7 Mon Sep 17 00:00:00 2001
From: Matthew Harris <m.r.p.harris@keele.ac.uk>
Date: Sat, 17 Jul 2021 09:31:46 +1000
Subject: [PATCH] undo traj edit

---
 R/hysplit_trajectory.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/hysplit_trajectory.R b/R/hysplit_trajectory.R
index a3ea626..9540b9c 100644
--- a/R/hysplit_trajectory.R
+++ b/R/hysplit_trajectory.R
@@ -218,7 +218,7 @@ hysplit_trajectory <- function(lat = 49.263,
       # Make nested loop with daily beginning hours
       for (j in daily_hours) {
         
-        start_hour_GMT <- daily_hours[j]
+        start_hour_GMT <- j
         
         if (start_year_GMT > 40) {
           full_year_GMT <- paste0("19", start_year_GMT)