-data(NCAAbb)
-# select one year and add some additional variables to the data frame
-NCAA2010 <-
- NCAAbb %>%
- filter(season == "2009-10") %>%
- mutate(
- dscore = hscore - ascore,
- homeTeamWon = dscore > 0,
- numHomeTeamWon <- -1 + 2 * as.numeric(homeTeamWon),
- winner = ifelse(homeTeamWon, home, away),
- loser = ifelse(homeTeamWon, away, home),
- wscore = ifelse(homeTeamWon, hscore, ascore),
- lscore = ifelse(homeTeamWon, ascore, hscore)
- )
-NCAA2010 %>% select(date, winner, loser, wscore, lscore, dscore, homeTeamWon) %>% head()
+
+data(NCAAbb)
+# select one year and add some additional variables to the data frame
+NCAA2010 <-
+ NCAAbb %>%
+ filter(season == "2009-10") %>%
+ mutate(
+ dscore = hscore - ascore,
+ homeTeamWon = dscore > 0,
+ numHomeTeamWon <- -1 + 2 * as.numeric(homeTeamWon),
+ winner = ifelse(homeTeamWon, home, away),
+ loser = ifelse(homeTeamWon, away, home),
+ wscore = ifelse(homeTeamWon, hscore, ascore),
+ lscore = ifelse(homeTeamWon, ascore, hscore)
+ )
+NCAA2010 %>% select(date, winner, loser, wscore, lscore, dscore, homeTeamWon) %>% head()
#> # A tibble: 6 × 7
#> date winner loser wscore lscore dscore homeTeamWon
#> <date> <chr> <chr> <int> <int> <int> <lgl>
@@ -112,7 +131,7 @@
diff --git a/docs/reference/NFL2007.html b/docs/reference/NFL2007.html
index a31c1aa..ce7ed7b 100644
--- a/docs/reference/NFL2007.html
+++ b/docs/reference/NFL2007.html
@@ -1,5 +1,5 @@
-