espn/coalesce-nickname-to-name

ffverse · Oct 25, 2023 · 33cbd79 · 33cbd79
1 parent 791a885
commit 33cbd79
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/R/espn_franchises.R b/R/espn_franchises.R
@@ -37,14 +37,16 @@ ff_franchises.espn_conn <- function(conn) {
       "franchise_id" = "id",
       "franchise_abbrev" = "abbrev",
       "franchise_location" = "location",
+      "franchise_name" = "name",
       "franchise_nickname" = "nickname",
       "logo" = "logo",
       "waiver_order" = "waiverRank",
       "user_id" = "primaryOwner"
     ) %>%
     dplyr::left_join(members, by = c("user_id" = "user_id")) %>%
     dplyr::mutate(
-      franchise_name = paste(.data$franchise_location, .data$franchise_nickname)
+      franchise_nickname = paste(.data$franchise_location, .data$franchise_nickname),
+      franchise_name = dplyr::coalesce(.data$franchise_nickname, .data$franchise_name),
     ) %>%
     dplyr::select(
       dplyr::any_of(c(