mlbplotR
mlbplotR copied to clipboard
Published
20 hours ago •
camdenk
camdenk
Team logos not fully showing
Here is the code:
# This part has been edited by @camdenk as a best estimation at what comes before this ----
# based on a previous gist
library(tidyverse)
library(baseballr)
library(gt)
library(gtExtras)
library(mlbplotR)
save_plot_local <- function(plot, plot_title, height, width) {
ggsave(plot = plot, paste0("~/Desktop/mlbplotR_release/", plot_title, ".png"),
height = height, width = width, dpi = "retina")
}
theme_538 <- function() {
ggthemes::theme_fivethirtyeight() +
ggplot2::theme(
plot.title = ggplot2::element_text(face = "bold"),
axis.title.x = ggplot2::element_text(size = 12, face = "bold"),
axis.title.y = ggplot2::element_text(size = 12, face = "bold"),
legend.position = "right",
legend.direction = "vertical"
)
}
playoff_teams_2022 <- c("TB", "CLE", "NYY", "SEA", "TOR", "HOU",
"ATL", "PHI", "STL", "LAD", "SDP", "NYM")
# End of Edited part ------------------------------------------------------------------------
team_hitting_2022 <- (fg_team_batter(startseason = 2022, endseason = 2022))
team_pitching_2022 <- (fg_team_pitcher(startseason = 2022, endseason = 2022))
team_hitting_2022
team_WAR_2022 <- team_hitting_2022 |>
select(team_name, hitting_WAR = WAR) |>
left_join(team_pitching_2022 |> select(team_name, pitching_WAR = WAR),
by = "team_name") |>
mutate(team_name = clean_team_abbrs(team_name),
playoff_team = team_name %in% playoff_teams_2022)
team_WAR_plot <- team_WAR_2022 |>
mutate(color = if_else(playoff_team, NA_character_, "b/w")) |>
ggplot(aes(hitting_WAR, pitching_WAR)) +
geom_median_lines(aes(v_var = hitting_WAR, h_var = pitching_WAR)) +
geom_mlb_logos(aes(team_abbr = team_name, color = color), width = 0.075, alpha = 0.75) +
theme_538() +
scale_color_identity() +
labs(title = "2022 MLB Teams by Hitting and Pitching WAR",
subtitle = "Colored Logos Are Playoff Teams",
caption = "Data: FanGraphs via baseballr",
x = "Hitting WAR",
y = "Pitching WAR")
save_plot_local(team_WAR_plot, "team_WAR", height = 8, width = 10)
team_WAR_plot
Session Info
sessioninfo::session_info()
─ Session info ────────────────────────────────────────────────────────────────────────────────────────────────────────────────
setting value
version R version 4.3.1 (2023-06-16)
os macOS Sonoma 14.3
system aarch64, darwin20
ui RStudio
language (EN)
collate en_US.UTF-8
ctype en_US.UTF-8
tz America/New_York
date 2024-02-05
rstudio 2023.12.1+402 Ocean Storm (desktop)
pandoc 3.1.1 @ /Applications/RStudio.app/Contents/Resources/app/quarto/bin/tools/ (via rmarkdown)
─ Packages ────────────────────────────────────────────────────────────────────────────────────────────────────────────────────
package * version date (UTC) lib source
arrow 14.0.0.2 2023-12-02 [1] CRAN (R 4.3.1)
assertthat 0.2.1 2019-03-21 [1] CRAN (R 4.3.0)
backports 1.4.1 2021-12-13 [1] CRAN (R 4.3.0)
baseballr * 1.6.0 2024-01-29 [1] Github (BillPetti/baseballr@edaf74e)
bit 4.0.5 2022-11-15 [1] CRAN (R 4.3.0)
bit64 4.0.5 2020-08-30 [1] CRAN (R 4.3.0)
cachem 1.0.8 2023-05-01 [1] CRAN (R 4.3.0)
cbbdata 0.3.0 2024-01-15 [1] Github (andreweatherman/cbbdata@e92683c)
cbbplotR 0.2.0 2024-01-05 [1] Github (andreweatherman/cbbplotR@5d38be9)
cli 3.6.2 2023-12-11 [1] CRAN (R 4.3.1)
codetools 0.2-19 2023-02-01 [1] CRAN (R 4.3.1)
colorspace 2.1-0 2023-01-23 [1] CRAN (R 4.3.0)
curl 5.2.0 2023-12-08 [1] CRAN (R 4.3.1)
data.table 1.15.0 2024-01-30 [1] CRAN (R 4.3.1)
devtools 2.4.5 2022-10-11 [1] CRAN (R 4.3.0)
digest 0.6.34 2024-01-11 [1] CRAN (R 4.3.1)
dplyr * 1.1.4 2023-11-17 [1] CRAN (R 4.3.1)
ellipsis 0.3.2 2021-04-29 [1] CRAN (R 4.3.0)
evaluate 0.23 2023-11-01 [1] CRAN (R 4.3.1)
fansi 1.0.6 2023-12-08 [1] CRAN (R 4.3.1)
farver 2.1.1 2022-07-06 [1] CRAN (R 4.3.0)
fastmap 1.1.1 2023-02-24 [1] CRAN (R 4.3.0)
fasttime 1.1-0 2022-03-16 [1] CRAN (R 4.3.0)
fontawesome 0.5.2 2023-08-19 [1] CRAN (R 4.3.0)
forcats * 1.0.0 2023-01-29 [1] CRAN (R 4.3.0)
fs 1.6.3 2023-07-20 [1] CRAN (R 4.3.0)
furrr 0.3.1 2022-08-15 [1] CRAN (R 4.3.0)
future 1.33.1 2023-12-22 [1] CRAN (R 4.3.1)
generics 0.1.3 2022-07-05 [1] CRAN (R 4.3.0)
ggpath 1.0.1 2023-01-29 [1] CRAN (R 4.3.0)
ggplot2 * 3.4.4 2023-10-12 [1] CRAN (R 4.3.1)
ggthemes 5.0.0 2023-11-21 [1] CRAN (R 4.3.1)
globals 0.16.2 2022-11-21 [1] CRAN (R 4.3.0)
glue 1.7.0 2024-01-09 [1] CRAN (R 4.3.1)
gt * 0.10.1 2024-01-17 [1] CRAN (R 4.3.1)
gtable 0.3.4 2023-08-21 [1] CRAN (R 4.3.0)
gtExtras * 0.5.0 2023-09-15 [1] CRAN (R 4.3.0)
hms 1.1.3 2023-03-21 [1] CRAN (R 4.3.0)
htmltools 0.5.7 2023-11-03 [1] CRAN (R 4.3.1)
htmlwidgets 1.6.4 2023-12-06 [1] CRAN (R 4.3.1)
httpuv 1.6.12 2023-10-23 [1] CRAN (R 4.3.1)
httr 1.4.7 2023-08-15 [1] CRAN (R 4.3.0)
httr2 1.0.0 2023-11-14 [1] CRAN (R 4.3.1)
janitor 2.2.0 2023-02-02 [1] CRAN (R 4.3.0)
jsonlite 1.8.8 2023-12-04 [1] CRAN (R 4.3.1)
knitr 1.45 2023-10-30 [1] CRAN (R 4.3.1)
labeling 0.4.3 2023-08-29 [1] CRAN (R 4.3.0)
later 1.3.1 2023-05-02 [1] CRAN (R 4.3.0)
lifecycle 1.0.4 2023-11-07 [1] CRAN (R 4.3.1)
listenv 0.9.0 2022-12-16 [1] CRAN (R 4.3.0)
lubridate * 1.9.3 2023-09-27 [1] CRAN (R 4.3.1)
magick 2.8.2 2023-12-20 [1] CRAN (R 4.3.1)
magrittr 2.0.3 2022-03-30 [1] CRAN (R 4.3.0)
memoise 2.0.1 2021-11-26 [1] CRAN (R 4.3.0)
mime 0.12 2021-09-28 [1] CRAN (R 4.3.0)
miniUI 0.1.1.1 2018-05-18 [1] CRAN (R 4.3.0)
mlbplotR * 1.1.0.9002 2024-02-02 [1] Github (camdenk/mlbplotR@e052a1e)
munsell 0.5.0 2018-06-12 [1] CRAN (R 4.3.0)
nbastatR 0.1.152 2023-12-30 [1] Github (abresler/nbastatR@72670a6)
nflplotR 1.2.0 2023-09-18 [1] CRAN (R 4.3.1)
nflreadr 1.4.0 2023-09-05 [1] CRAN (R 4.3.0)
pak 0.7.1 2023-12-11 [1] CRAN (R 4.3.1)
paletteer 1.5.0 2022-10-19 [1] CRAN (R 4.3.0)
parallelly 1.36.0 2023-05-26 [1] CRAN (R 4.3.0)
pillar 1.9.0 2023-03-22 [1] CRAN (R 4.3.0)
pkgbuild 1.4.3 2023-12-10 [1] CRAN (R 4.3.1)
pkgconfig 2.0.3 2019-09-22 [1] CRAN (R 4.3.0)
pkgload 1.3.3 2023-09-22 [1] CRAN (R 4.3.1)
profvis 0.3.8 2023-05-02 [1] CRAN (R 4.3.0)
promises 1.2.1 2023-08-10 [1] CRAN (R 4.3.0)
purrr * 1.0.2 2023-08-10 [1] CRAN (R 4.3.0)
R6 2.5.1 2021-08-19 [1] CRAN (R 4.3.0)
ragg 1.2.6 2023-10-10 [1] CRAN (R 4.3.1)
rappdirs 0.3.3 2021-01-31 [1] CRAN (R 4.3.0)
Rcpp 1.0.12 2024-01-09 [1] CRAN (R 4.3.1)
RcppParallel 5.1.7 2023-02-27 [1] CRAN (R 4.3.0)
readr * 2.1.5 2024-01-10 [1] CRAN (R 4.3.1)
rematch2 2.1.2 2020-05-01 [1] CRAN (R 4.3.0)
remotes 2.4.2.1 2023-07-18 [1] CRAN (R 4.3.0)
rlang 1.1.3 2024-01-10 [1] CRAN (R 4.3.1)
rmarkdown 2.25 2023-09-18 [1] CRAN (R 4.3.1)
rstudioapi 0.15.0 2023-07-07 [1] CRAN (R 4.3.0)
rvest 1.0.3 2022-08-19 [1] CRAN (R 4.3.0)
scales 1.3.0 2023-11-28 [1] CRAN (R 4.3.1)
sessioninfo 1.2.2 2021-12-06 [1] CRAN (R 4.3.0)
shiny 1.8.0 2023-11-17 [1] CRAN (R 4.3.1)
snakecase 0.11.1 2023-08-27 [1] CRAN (R 4.3.0)
stringi 1.8.3 2023-12-11 [1] CRAN (R 4.3.1)
stringr * 1.5.1 2023-11-14 [1] CRAN (R 4.3.1)
systemfonts 1.0.5 2023-10-09 [1] CRAN (R 4.3.1)
textshaping 0.3.7 2023-10-09 [1] CRAN (R 4.3.1)
tibble * 3.2.1 2023-03-20 [1] CRAN (R 4.3.0)
tidyr * 1.3.1 2024-01-24 [1] CRAN (R 4.3.1)
tidyselect 1.2.0 2022-10-10 [1] CRAN (R 4.3.0)
tidyverse * 2.0.0 2023-02-22 [1] CRAN (R 4.3.0)
timechange 0.3.0 2024-01-18 [1] CRAN (R 4.3.1)
tzdb 0.4.0 2023-05-12 [1] CRAN (R 4.3.0)
urlchecker 1.0.1 2021-11-30 [1] CRAN (R 4.3.0)
usethis 2.2.2 2023-07-06 [1] CRAN (R 4.3.0)
utf8 1.2.4 2023-10-22 [1] CRAN (R 4.3.1)
vctrs 0.6.5 2023-12-01 [1] CRAN (R 4.3.1)
withr 3.0.0 2024-01-16 [1] CRAN (R 4.3.1)
xfun 0.41 2023-11-01 [1] CRAN (R 4.3.1)
xml2 1.3.6 2023-12-04 [1] CRAN (R 4.3.1)
xtable 1.8-4 2019-04-21 [1] CRAN (R 4.3.0)
yaml 2.3.8 2023-12-11 [1] CRAN (R 4.3.1)
[1] /Library/Frameworks/R.framework/Versions/4.3-arm64/Resources/library
Can you run the following in a fresh R session to see if it works? I'm guessing there's some potential package clashing.
library(dplyr)
library(ggplot2)
library(baseballr)
library(mlbplotR)
playoff_teams_2022 <- c("TB", "CLE", "NYY", "SEA", "TOR", "HOU",
"ATL", "PHI", "STL", "LAD", "SDP", "NYM")
# geom_mlb_logos example -------------------------------------------------------
team_hitting_2022 <- fg_team_batter(startseason = 2022, endseason = 2022, qual = 0)
team_pitching_2022 <- fg_team_pitcher(startseason = 2022, endseason = 2022, qual = 0)
team_WAR_2022 <- team_hitting_2022 |>
select(Team = team_name, hitting_WAR = WAR) |>
left_join(team_pitching_2022 |> select(Team = team_name, pitching_WAR = WAR),
by = "Team") |>
mutate(Team = clean_team_abbrs(Team),
playoff_team = Team %in% playoff_teams_2022)
team_WAR_plot <- team_WAR_2022 |>
mutate(color = if_else(playoff_team, NA_character_, "b/w")) |>
ggplot(aes(hitting_WAR, pitching_WAR)) +
geom_median_lines(aes(v_var = hitting_WAR, h_var = pitching_WAR)) +
geom_mlb_logos(aes(team_abbr = Team, color = color), width = 0.075, alpha = 0.75) +
scale_color_identity() +
labs(title = "2022 MLB Teams by Hitting and Pitching WAR",
subtitle = "Colored Logos Are Playoff Teams",
caption = "Data: FanGraphs via baseballr",
x = "Hitting WAR",
y = "Pitching WAR")
ggsave("~/Desktop/team_WAR.png", height = 8, width = 10, dpi = "retina")
Can you add the output of sessioninfo::session_info() from the last reprex?
> sessioninfo::session_info()
─ Session info ────────────────────────────────────────────────────────────────────────────────────────────────────────────────
setting value
version R version 4.3.1 (2023-06-16)
os macOS Sonoma 14.3
system aarch64, darwin20
ui RStudio
language (EN)
collate en_US.UTF-8
ctype en_US.UTF-8
tz America/New_York
date 2024-02-06
rstudio 2023.12.1+402 Ocean Storm (desktop)
pandoc 3.1.1 @ /Applications/RStudio.app/Contents/Resources/app/quarto/bin/tools/ (via rmarkdown)
─ Packages ────────────────────────────────────────────────────────────────────────────────────────────────────────────────────
package * version date (UTC) lib source
arrow 14.0.0.2 2023-12-02 [1] CRAN (R 4.3.1)
assertthat 0.2.1 2019-03-21 [1] CRAN (R 4.3.0)
backports 1.4.1 2021-12-13 [1] CRAN (R 4.3.0)
baseballr * 1.6.0 2024-01-29 [1] Github (BillPetti/baseballr@edaf74e)
bit 4.0.5 2022-11-15 [1] CRAN (R 4.3.0)
bit64 4.0.5 2020-08-30 [1] CRAN (R 4.3.0)
cachem 1.0.8 2023-05-01 [1] CRAN (R 4.3.0)
cbbdata 0.3.0 2024-01-15 [1] Github (andreweatherman/cbbdata@e92683c)
cbbplotR 0.2.0 2024-01-05 [1] Github (andreweatherman/cbbplotR@5d38be9)
cli 3.6.2 2023-12-11 [1] CRAN (R 4.3.1)
codetools 0.2-19 2023-02-01 [1] CRAN (R 4.3.1)
colorspace 2.1-0 2023-01-23 [1] CRAN (R 4.3.0)
curl 5.2.0 2023-12-08 [1] CRAN (R 4.3.1)
data.table 1.15.0 2024-01-30 [1] CRAN (R 4.3.1)
devtools 2.4.5 2022-10-11 [1] CRAN (R 4.3.0)
digest 0.6.34 2024-01-11 [1] CRAN (R 4.3.1)
dplyr * 1.1.4 2023-11-17 [1] CRAN (R 4.3.1)
ellipsis 0.3.2 2021-04-29 [1] CRAN (R 4.3.0)
evaluate 0.23 2023-11-01 [1] CRAN (R 4.3.1)
fansi 1.0.6 2023-12-08 [1] CRAN (R 4.3.1)
farver 2.1.1 2022-07-06 [1] CRAN (R 4.3.0)
fastmap 1.1.1 2023-02-24 [1] CRAN (R 4.3.0)
fasttime 1.1-0 2022-03-16 [1] CRAN (R 4.3.0)
fontawesome 0.5.2 2023-08-19 [1] CRAN (R 4.3.0)
fs 1.6.3 2023-07-20 [1] CRAN (R 4.3.0)
furrr 0.3.1 2022-08-15 [1] CRAN (R 4.3.0)
future 1.33.1 2023-12-22 [1] CRAN (R 4.3.1)
generics 0.1.3 2022-07-05 [1] CRAN (R 4.3.0)
ggpath 1.0.1 2023-01-29 [1] CRAN (R 4.3.0)
ggplot2 * 3.4.4 2023-10-12 [1] CRAN (R 4.3.1)
ggthemes 5.0.0 2023-11-21 [1] CRAN (R 4.3.1)
globals 0.16.2 2022-11-21 [1] CRAN (R 4.3.0)
glue 1.7.0 2024-01-09 [1] CRAN (R 4.3.1)
gt 0.10.1 2024-01-17 [1] CRAN (R 4.3.1)
gtable 0.3.4 2023-08-21 [1] CRAN (R 4.3.0)
gtExtras 0.5.0 2023-09-15 [1] CRAN (R 4.3.0)
hms 1.1.3 2023-03-21 [1] CRAN (R 4.3.0)
htmltools 0.5.7 2023-11-03 [1] CRAN (R 4.3.1)
htmlwidgets 1.6.4 2023-12-06 [1] CRAN (R 4.3.1)
httpuv 1.6.12 2023-10-23 [1] CRAN (R 4.3.1)
httr 1.4.7 2023-08-15 [1] CRAN (R 4.3.0)
httr2 1.0.0 2023-11-14 [1] CRAN (R 4.3.1)
janitor 2.2.0 2023-02-02 [1] CRAN (R 4.3.0)
jsonlite 1.8.8 2023-12-04 [1] CRAN (R 4.3.1)
knitr 1.45 2023-10-30 [1] CRAN (R 4.3.1)
labeling 0.4.3 2023-08-29 [1] CRAN (R 4.3.0)
later 1.3.1 2023-05-02 [1] CRAN (R 4.3.0)
lifecycle 1.0.4 2023-11-07 [1] CRAN (R 4.3.1)
listenv 0.9.0 2022-12-16 [1] CRAN (R 4.3.0)
lubridate 1.9.3 2023-09-27 [1] CRAN (R 4.3.1)
magick 2.8.2 2023-12-20 [1] CRAN (R 4.3.1)
magrittr 2.0.3 2022-03-30 [1] CRAN (R 4.3.0)
memoise 2.0.1 2021-11-26 [1] CRAN (R 4.3.0)
mime 0.12 2021-09-28 [1] CRAN (R 4.3.0)
miniUI 0.1.1.1 2018-05-18 [1] CRAN (R 4.3.0)
mlbplotR * 1.1.0.9002 2024-02-02 [1] Github (camdenk/mlbplotR@e052a1e)
munsell 0.5.0 2018-06-12 [1] CRAN (R 4.3.0)
nbastatR 0.1.152 2023-12-30 [1] Github (abresler/nbastatR@72670a6)
nflplotR 1.2.0 2023-09-18 [1] CRAN (R 4.3.1)
nflreadr 1.4.0 2023-09-05 [1] CRAN (R 4.3.0)
pak 0.7.1 2023-12-11 [1] CRAN (R 4.3.1)
paletteer 1.5.0 2022-10-19 [1] CRAN (R 4.3.0)
parallelly 1.36.0 2023-05-26 [1] CRAN (R 4.3.0)
pillar 1.9.0 2023-03-22 [1] CRAN (R 4.3.0)
pkgbuild 1.4.3 2023-12-10 [1] CRAN (R 4.3.1)
pkgconfig 2.0.3 2019-09-22 [1] CRAN (R 4.3.0)
pkgload 1.3.3 2023-09-22 [1] CRAN (R 4.3.1)
profvis 0.3.8 2023-05-02 [1] CRAN (R 4.3.0)
promises 1.2.1 2023-08-10 [1] CRAN (R 4.3.0)
purrr 1.0.2 2023-08-10 [1] CRAN (R 4.3.0)
R6 2.5.1 2021-08-19 [1] CRAN (R 4.3.0)
ragg 1.2.6 2023-10-10 [1] CRAN (R 4.3.1)
rappdirs 0.3.3 2021-01-31 [1] CRAN (R 4.3.0)
Rcpp 1.0.12 2024-01-09 [1] CRAN (R 4.3.1)
RcppParallel 5.1.7 2023-02-27 [1] CRAN (R 4.3.0)
readr 2.1.5 2024-01-10 [1] CRAN (R 4.3.1)
rematch2 2.1.2 2020-05-01 [1] CRAN (R 4.3.0)
remotes 2.4.2.1 2023-07-18 [1] CRAN (R 4.3.0)
rlang 1.1.3 2024-01-10 [1] CRAN (R 4.3.1)
rmarkdown 2.25 2023-09-18 [1] CRAN (R 4.3.1)
rstudioapi 0.15.0 2023-07-07 [1] CRAN (R 4.3.0)
rvest 1.0.3 2022-08-19 [1] CRAN (R 4.3.0)
scales 1.3.0 2023-11-28 [1] CRAN (R 4.3.1)
sessioninfo 1.2.2 2021-12-06 [1] CRAN (R 4.3.0)
shiny 1.8.0 2023-11-17 [1] CRAN (R 4.3.1)
snakecase 0.11.1 2023-08-27 [1] CRAN (R 4.3.0)
stringi 1.8.3 2023-12-11 [1] CRAN (R 4.3.1)
stringr 1.5.1 2023-11-14 [1] CRAN (R 4.3.1)
systemfonts 1.0.5 2023-10-09 [1] CRAN (R 4.3.1)
textshaping 0.3.7 2023-10-09 [1] CRAN (R 4.3.1)
tibble 3.2.1 2023-03-20 [1] CRAN (R 4.3.0)
tidyr 1.3.1 2024-01-24 [1] CRAN (R 4.3.1)
tidyselect 1.2.0 2022-10-10 [1] CRAN (R 4.3.0)
timechange 0.3.0 2024-01-18 [1] CRAN (R 4.3.1)
tzdb 0.4.0 2023-05-12 [1] CRAN (R 4.3.0)
urlchecker 1.0.1 2021-11-30 [1] CRAN (R 4.3.0)
usethis 2.2.2 2023-07-06 [1] CRAN (R 4.3.0)
utf8 1.2.4 2023-10-22 [1] CRAN (R 4.3.1)
vctrs 0.6.5 2023-12-01 [1] CRAN (R 4.3.1)
withr 3.0.0 2024-01-16 [1] CRAN (R 4.3.1)
xfun 0.41 2023-11-01 [1] CRAN (R 4.3.1)
xml2 1.3.6 2023-12-04 [1] CRAN (R 4.3.1)
xtable 1.8-4 2019-04-21 [1] CRAN (R 4.3.0)
yaml 2.3.8 2023-12-11 [1] CRAN (R 4.3.1)
[1] /Library/Frameworks/R.framework/Versions/4.3-arm64/Resources/library
Can you restart your R Session and then rerun the reprex attached above? There are some packages in the session info you output that weren't included in the reprex (like cbbplotR and nflplotR, among others) that may be impacting the performance.
Still the same issue. When I start R up again I see this in the terminal:
[Workspace loaded from ~/.RData]
Registered S3 method overwritten by 'ggpath':
method from
element_grob.element_path mlbplotR
Registered S3 methods overwritten by 'nflplotR':
method from
grobHeight.axisImageGrob mlbplotR
grobWidth.axisImageGrob mlbplotR
Could that be the issue?