diff --git a/R/nfl_team_tiers.R b/R/nfl_team_tiers.R index fe841d3..f63d5a9 100644 --- a/R/nfl_team_tiers.R +++ b/R/nfl_team_tiers.R @@ -49,14 +49,14 @@ #' )[,tier_rank := sample(1:.N, .N), by = "tier_no"] #' #' # Plot team tiers -#' nfl_team_tiers(df) +#' nfl_team_tiers(dt) #' #' # Create a combined tier which is useful for tiers with lots of teams that #' # should be split up in two or more rows. This is done by setting an empty #' # string for the tier 5 description and removing the tier separation line #' # below tier number 4. #' # This example also shows how to turn off the subtitle and add a caption -#' nfl_team_tiers(df, +#' nfl_team_tiers(dt, #' subtitle = NULL, #' caption = "This is the caption", #' tier_desc = c("1" = "Super Bowl", @@ -69,7 +69,7 @@ #' # For the development of the tiers, it can be useful to turn off logo image #' # rendering as this can take quite a long time. By setting `devel = TRUE`, the #' # logo images are replaced by team abbreviations which is much faster -#' nfl_team_tiers(df, +#' nfl_team_tiers(dt, #' tier_desc = c("1" = "Super Bowl", #' "2" = "Very Good", #' "3" = "", diff --git a/man/nfl_team_tiers.Rd b/man/nfl_team_tiers.Rd index 8b23831..62b77df 100644 --- a/man/nfl_team_tiers.Rd +++ b/man/nfl_team_tiers.Rd @@ -77,14 +77,14 @@ dt <- data.table::data.table( )[,tier_rank := sample(1:.N, .N), by = "tier_no"] # Plot team tiers -nfl_team_tiers(df) +nfl_team_tiers(dt) # Create a combined tier which is useful for tiers with lots of teams that # should be split up in two or more rows. This is done by setting an empty # string for the tier 5 description and removing the tier separation line # below tier number 4. # This example also shows how to turn off the subtitle and add a caption -nfl_team_tiers(df, +nfl_team_tiers(dt, subtitle = NULL, caption = "This is the caption", tier_desc = c("1" = "Super Bowl", @@ -97,7 +97,7 @@ nfl_team_tiers(df, # For the development of the tiers, it can be useful to turn off logo image # rendering as this can take quite a long time. By setting `devel = TRUE`, the # logo images are replaced by team abbreviations which is much faster -nfl_team_tiers(df, +nfl_team_tiers(dt, tier_desc = c("1" = "Super Bowl", "2" = "Very Good", "3" = "", diff --git a/tests/testthat/test-nfl_team_tiers.R b/tests/testthat/test-nfl_team_tiers.R index bfb4892..f3ad3cc 100644 --- a/tests/testthat/test-nfl_team_tiers.R +++ b/tests/testthat/test-nfl_team_tiers.R @@ -14,7 +14,7 @@ test_that("team tiers work", { )[,tier_rank := sample(1:.N, .N), by = "tier_no"] # Check dev mode only because logos are tested elsewhere - p1 <- nfl_team_tiers(df, + p1 <- nfl_team_tiers(dt, tier_desc = c("1" = "Super Bowl", "2" = "Very Good", "3" = "",