Merge pull request #29 from DavisVaughan/fix/join-arg

`na.rm` is not an argument to `left_join()`
CWWhitney · Dec 15, 2022 · 9d93e9f · 9d93e9f
2 parents e7f2a79 + 231e966
commit 9d93e9f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/FLs.R b/R/FLs.R
@@ -92,7 +92,7 @@ Ip <- melt_FLS %>%
    dplyr::summarize(Ip = sum(value, na.rm = TRUE)) 
 
 #Bind Ip and Iu data
-FLspdata <- dplyr::left_join(Iu, Ip, by = "sp_name", na.rm = TRUE)
+FLspdata <- dplyr::left_join(Iu, Ip, by = "sp_name")
 
  #Calculate FLs = Ip * 100 / Iu
  FLspdata$FLs <- (FLspdata$Ip*100) / FLspdata$FCs