update docs

sportsdataverse · Jun 6, 2023 · f9c5617 · f9c5617
1 parent b79f942
commit f9c5617
Show file tree

Hide file tree

Showing 8 changed files with 14 additions and 12 deletions.
diff --git a/R/kp_team_tables.R b/R/kp_team_tables.R
@@ -517,9 +517,9 @@ kp_gameplan <- function(team, year=2021){
     expr = {
       if (!has_kp_user_and_pw()) stop("This function requires a KenPom subscription e-mail and password combination,\n      set as the system environment variables KP_USER and KP_PW.", "\n       See ?kp_user_pw for details.", call. = FALSE)
       browser <- login()
-      if (!(is.numeric(min_year) && nchar(min_year) == 4 && min_year >= 2001)) {
+      if (!(is.numeric(year) && nchar(year) == 4 && year >= 2001)) {
         # Check if year is numeric, if not NULL
-        cli::cli_abort("Enter valid min_ as a number (YYYY), data only goes back to 2001")
+        cli::cli_abort("Enter valid year as a number (YYYY), data only goes back to 2001")
       }
 
       if (!(team %in% hoopR::teams_links$Team)) {
@@ -786,9 +786,9 @@ kp_opptracker <- function(team, year = 2021){
     expr = {
       if (!has_kp_user_and_pw()) stop("This function requires a KenPom subscription e-mail and password combination,\n      set as the system environment variables KP_USER and KP_PW.", "\n       See ?kp_user_pw for details.", call. = FALSE)
       browser <- login()
-      if (!(is.numeric(min_year) && nchar(min_year) == 4 && min_year >= 2001)) {
+      if (!(is.numeric(year) && nchar(year) == 4 && year >= 2001)) {
         # Check if year is numeric, if not NULL
-        cli::cli_abort("Enter valid min_ as a number (YYYY), data only goes back to 2001")
+        cli::cli_abort("Enter valid year as a number (YYYY), data only goes back to 2001")
       }
 
       if (!(team %in% hoopR::teams_links$Team)) {

diff --git a/R/ncaa_mbb_data.R b/R/ncaa_mbb_data.R
@@ -84,7 +84,7 @@ ncaa_mbb_teams <- function(year = most_recent_mbb_season(), division = 1, ...) {
                     "&division=", division,
                     "&sport_code=MBB")
 
-      resp <- httr::RETRY("GET", url = {{url}}, ..., headers, httr::timeout(15))
+      resp <- httr::RETRY("GET", url = {{url}}, headers, httr::timeout(15))
 
       data_read <- resp %>%
         httr::content(as = "text", encoding = "UTF-8") %>%
@@ -122,7 +122,7 @@ ncaa_mbb_teams <- function(year = most_recent_mbb_season(), division = 1, ...) {
                                  "&division=", division,
                                  "&sport_code=MBB")
 
-        resp <- httr::RETRY("GET", url = {{conf_team_urls}}, ..., headers, httr::timeout(15))
+        resp <- httr::RETRY("GET", url = {{conf_team_urls}},  headers, httr::timeout(15))
 
         team_urls <- resp %>%
           httr::content(as = "text", encoding = "UTF-8") %>%

diff --git a/man/espn_nba_scoreboard.Rd b/man/espn_nba_scoreboard.Rd
diff --git a/man/kp_fanmatch.Rd b/man/kp_fanmatch.Rd
diff --git a/man/load_mbb_pbp.Rd b/man/load_mbb_pbp.Rd
diff --git a/man/load_mbb_player_box.Rd b/man/load_mbb_player_box.Rd
diff --git a/man/load_mbb_schedule.Rd b/man/load_mbb_schedule.Rd
diff --git a/man/load_mbb_team_box.Rd b/man/load_mbb_team_box.Rd