Update utils.R

PlanktonTeam · Nov 15, 2023 · 234baac · 234baac
1 parent af5a308
commit 234baac
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/utils.R b/R/utils.R
@@ -584,7 +584,7 @@ pr_get_Coeffs <-  function(df){
         dplyr::filter(.data$StationName == stations)
     }
 
-    m <- stats::lm(Values ~ Year_Local + pr_harmonic(Month_Local, k = 1), data = lmdat)
+    m <- stats::lm(Values ~ Year_Local + pr_harmonic(Month, k = 1), data = lmdat)
 
     lmdat <- tibble::tibble(lmdat %>%
                               dplyr::bind_cols(fv = m$fitted.values))