tests/testthat/helper-scrapePlayersHR.R

In pbulsink/HockeyScrapR: Tools to scrape hockey data

# Helper Data for test-scrapePlayers
try_delete <- function(f) {
  if (file.exists(f)) {
    tryCatch({
      file.remove(f)
    }, error = function(e) message(paste0("Error deleting file ", f, ", Continuing...")))
  }
}

pl_aa <- structure(list(Complete = "<p class=\"nhl\"><a href=\"/players/a/aaltoan01.html\">Antti Aalto</a> (1998-2001", BlnNHL = structure(2L,
  .Label = c("FALSE", "TRUE"), class = "factor"), URL = "/players/a/aaltoan01.html", Name = "Antti Aalto", Active = "1998-2001"),
  .Names = c("Complete", "BlnNHL", "URL", "Name", "Active"), row.names = 1L, class = "data.frame")

pl_names <- c("Complete", "BlnNHL", "URL", "Name", "Active")

player_list <- structure(list(Complete = c("<p class=\"nhl\"><a href=\"/players/a/aaltoan01.html\">Antti Aalto</a> (1998-2001",
  "<p class=\"non_nhl\"><a href=\"/players/a/aaltoju01.html\">Juhamatti Aaltonen</a> (", "<p class=\"non_nhl\"><a href=\"/players/a/aaltomi01.html\">Miro Aaltonen</a> (",
  "<p class=\"non_nhl\"><a href=\"/players/a/abbeybr01.html\">Bruce Abbey</a> (", "<p class=\"nhl\"><a href=\"/players/a/abbotge01.html\">George Abbott</a> (1944-1944",
  "<p class=\"nhl\"><a href=\"/players/a/abbotre01.html\">Reg Abbott</a> (1953-1953", "<p class=\"nhl\"><strong><a href=\"/players/a/abbotsp01.html\">Spencer Abbott</a></strong> (2014-2017",
  "<p class=\"nhl\"><a href=\"/players/a/abelcl01.html\">Clarence Abel</a> (1927-1934", "<p class=\"nhl\"><a href=\"/players/a/abelge01.html\">Gerry Abel</a> (1967-1967"),
  BlnNHL = structure(c(2L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L), .Label = c("FALSE", "TRUE"), class = "factor"), URL = c("/players/a/aaltoan01.html",
    "/players/a/aaltoju01.html", "/players/a/aaltomi01.html", "/players/a/abbeybr01.html", "/players/a/abbotge01.html",
    "/players/a/abbotre01.html", "/players/a/abbotsp01.html", "/players/a/abelcl01.html", "/players/a/abelge01.html"),
  Name = c("Antti Aalto", "Juhamatti Aaltonen", "Miro Aaltonen", "Bruce Abbey", "George Abbott", "Reg Abbott", "Spencer Abbott",
    "Clarence Abel", "Gerry Abel"), Active = c("1998-2001", "", "", "", "1944-1944", "1953-1953", "2014-2017", "1927-1934",
    "1967-1967")), .Names = c("Complete", "BlnNHL", "URL", "Name", "Active"), row.names = c(1L, 2L, 3L, 4L, 5L, 6L, 7L,
  9L, 10L), class = "data.frame")

player_stats <- structure(list(PlayerStats = structure(list(Season = structure(c(1L, 2L, 3L, 4L, 2L, 5L, 5L, 5L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 7L, 7L,
  7L, 7L, 8L, 8L, 8L, 8L, 9L, 9L, 10L, 10L, 10L, 10L, 1L, 3L, 3L, 4L, 11L, 11L, 11L, 12L, 13L, 14L, 15L, 6L, 7L, 7L, 8L, 9L, 10L,
  10L, 4L, 11L, 12L, 13L, 16L, 17L, 18L, 19L, 20L, 16L, 21L, 22L, 22L, 23L, 24L, 25L, 26L, 27L, 28L, 29L, 29L, 30L, 30L, 17L, 17L,
  18L, 18L, 19L, 20L, 21L, 22L, 24L, 25L, 31L, 28L), .Label = c("1997-98", "1998-99", "1999-00", "2000-01", "1991-92", "1992-93", "1993-94",
  "1994-95", "1995-96", "1996-97", "2001-02", "2002-03", "2003-04", "2004-05", "2005-06", "1952-53", "1948-49", "1949-50", "1950-51",
  "1951-52", "1953-54", "1954-55", "1955-56", "1956-57", "1957-58", "1958-59", "1960-61", "1962-63", "1963-64", "1964-65", "1961-62"),
  class = "factor"), Team = structure(c(1L, 1L, 1L, 1L, 1L, 8L, 7L, 4L, 9L, 7L, 10L, 4L, 2L, 8L, 11L, 6L, 11L, 10L, 4L, 11L,
  6L, 10L, 4L, 6L, 10L, 10L, 10L, 4L, 4L, 3L, 4L, 4L, 3L, 5L, 4L, 4L, 5L, 10L, 10L, 10L, 11L, 11L, 10L, 10L, 10L, 10L, 10L, 3L,
  5L, 5L, 10L, 12L, 13L, 13L, 17L, 17L, 17L, 17L, 16L, 18L, 18L, 18L, 18L, 18L, 19L, 19L, 19L, 15L, 19L, 14L, 13L, 13L, 13L, 13L,
  17L, 17L, 17L, 18L, 18L, 18L, 19L, 19L), .Label = c("MDA", "2 Teams", "Cincinnati Mighty Ducks", "Finland", "Jokerit Helsinki", "Kiekko-67 Turku",
  "SaiPa Lappeenranta", "SaiPa Lappeenranta Jr.", "SaiPa Lappeenranta U18", "TPS Turku", "TPS Turku Jr.", "MTL", "Brandon Wheat Kings", "Canada",
  "Clinton Comets", "Pittsburgh Hornets", "Victoria Cougars", "Windsor Bulldogs", "Winnipeg Maroons"), class = "factor"),
  Age = structure(c(1L, 2L, 3L, 4L, 2L, 5L, 5L, 5L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 7L, 7L, 7L, 7L, 8L, 8L, 8L, 8L, 9L, 9L, 10L, 10L, 10L, 10L, 1L, 3L, 3L,
  4L, 11L, 11L, 11L, 12L, 13L, 14L, 15L, 6L, 7L, 7L, 8L, 9L, 10L, 10L, 4L, 11L, 12L, 13L, 1L, 7L, 8L, 9L, 10L, 1L, 2L, 3L, 3L,
  4L, 11L, 12L, 13L, 15L, 16L, 17L, 17L, 18L, 18L, 7L, 7L, 8L, 8L, 9L, 10L, 2L, 3L, 11L, 12L, 19L, 16L), .Label = c("22", "23",
  "24", "25", "16", "17", "18", "19", "20", "21", "26", "27", "28", "29", "30", "32", "33", "34", "31"), class = "factor"), Lg = structure(c(1L,
  1L, 1L, 1L, 1L, 5L, 8L, 3L, 6L, 8L, 7L, 3L, 5L, 5L, 5L, 8L, 5L, 7L, 12L, 5L, 8L, 7L, 12L, 8L, 7L, 7L, 4L, 11L, 9L, 2L, 11L, 9L,
  2L, 7L, 10L, 11L, 7L, 7L, 7L, 7L, 5L, 5L, 7L, 7L, 7L, 7L, 4L, 2L, 7L, 7L, 7L, 1L, 15L, 15L, 18L, 18L, 21L, 21L, 2L, 17L, 17L,
  17L, 16L, 16L, 14L, 14L, 19L, 13L, 19L, 20L, 15L, 23L, 15L, 23L, 18L, 18L, 21L, 17L, 17L, 16L, 22L, 22L), .Label = c("NHL", "AHL",
  "EJC-A", "EuroHL", "Fin-Jr.", "Fin-U18", "Finland", "Finland-2", "Nat-Tm", "Olympics", "WC-A", "WJC-A", "EHL", "MAHA", "MJHL",
  "NOHA", "OHA-Sr.", "PCHL", "SSHL", "WEC-A", "WHL", "Al-Cup", "M-Cup"), class = "factor"), GP = structure(c(2L, 4L, 3L, 1L,
  5L, 10L, 12L, 20L, 2L, 13L, 6L, 22L, 9L, 2L, 8L, 5L, 7L, 15L, 23L, 11L, 6L, 18L, 23L, 11L, 17L, 18L, 20L, 20L, 8L, 14L, 24L,
  2L, 17L, 19L, 5L, 25L, 18L, 21L, 16L, 5L, 22L, 20L, 7L, 20L, 26L, 26L, 11L, 2L, 1L, 7L, 27L, 2L, 30L, 29L, 35L, 32L, 33L,
  34L, 2L, 19L, 19L, 31L, 28L, 24L, 12L, 26L, 26L, 7L, 22L, 23L, 23L, 37L, 22L, 22L, 1L, 27L, 2L, 1L, 24L, 1L, 26L, 36L), .Label = c("12",
  "3", "63", "73", "4", "1", "10", "14", "17", "19", "2", "20", "23", "29", "33", "37", "40", "44", "48", "5", "50", "6", "7",
  "8", "9", "11", "13", "35", "36", "39", "52", "57", "65", "69", "70", "15", "16"), class = "factor"), G = structure(c(1L, 3L,
  4L, 2L, 1L, 5L, 13L, 10L, 1L, 13L, 1L, 2L, 5L, 11L, 13L, 10L, 3L, 12L, 1L, 2L, 1L, 6L, 10L, 1L, 8L, 8L, 3L, 10L, 10L, 11L,
  1L, 1L, 7L, 14L, 1L, 2L, 4L, 9L, 15L, 2L, 10L, 2L, 2L, 1L, 3L, 12L, 2L, 10L, 2L, 10L, 10L, 1L, 9L, 19L, 7L, 9L, 18L, 4L, 1L,
  18L, 16L, 17L, 13L, 2L, 7L, 12L, 15L, 10L, 13L, 10L, 12L, 4L, 13L, 13L, 3L, 3L, 1L, 4L, 3L, 12L, 4L, 13L), .Label = c("0",
  "1", "3", "7", "10", "11", "14", "15", "16", "2", "4", "5", "6", "8", "9", "20", "21", "22", "27"), class = "factor"), A = structure(c(1L,
  4L, 3L, 2L, 1L, 5L, 15L, 1L, 2L, 17L, 1L, 13L, 5L, 9L, 17L, 9L, 17L, 18L, 9L, 9L, 2L, 16L, 13L, 9L, 6L, 8L, 13L, 1L, 14L, 18L,
  1L, 2L, 11L, 10L, 1L, 1L, 6L, 12L, 7L, 1L, 9L, 14L, 2L, 2L, 4L, 15L, 2L, 2L, 17L, 2L, 18L, 1L, 6L, 23L, 22L, 23L, 21L, 20L, 1L,
  24L, 22L, 11L, 19L, 2L, 18L, 10L, 5L, 13L, 15L, 9L, 2L, 15L, 16L, 2L, 18L, 15L, 9L, 14L, 2L, 2L, 5L, 25L), .Label = c("0",
  "1", "11", "5", "10", "16", "18", "19", "2", "21", "26", "28", "3", "4", "6", "7", "8", "9", "12", "17", "22", "24", "27", "34",
  "13"), class = "factor"), PTS = structure(c(1L, 4L, 2L, 3L, 1L, 10L, 7L, 3L, 5L, 9L, 1L, 17L, 10L, 21L, 9L, 17L, 6L, 9L, 3L,
  14L, 5L, 2L, 20L, 3L, 15L, 16L, 21L, 3L, 21L, 8L, 1L, 5L, 18L, 13L, 1L, 5L, 11L, 19L, 12L, 5L, 17L, 20L, 3L, 5L, 4L, 6L, 3L,
  14L, 22L, 14L, 6L, 1L, 26L, 30L, 27L, 28L, 19L, 24L, 1L, 31L, 19L, 29L, 2L, 3L, 11L, 25L, 23L, 20L, 7L, 17L, 21L, 8L, 8L, 33L,
  7L, 22L, 3L, 6L, 17L, 21L, 32L, 23L), .Label = c("0", "18", "2", "8", "1", "11", "12", "13", "14", "20", "23", "27", "29", "3",
  "31", "34", "4", "40", "44", "5", "6", "9", "19", "24", "26", "32", "38", "43", "47", "54", "56", "17", "7"), class = "factor"),
  `+/-` = structure(c(1L, 2L, 3L, 4L, 5L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L,
  6L, 6L, 6L, 6L, 8L, 1L, 6L, 9L, 6L, 7L, 4L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L,
  6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L), .Label = c("-1",
  "-12", "-13", "1", "0", "", "-3", "-8", "27"), class = "factor"), PIM = structure(c(1L, 3L, 4L, 2L, 2L, 17L, 8L, 5L, 2L, 5L,
  1L, 7L, 8L, 2L, 7L, 10L, 5L, 6L, 21L, 2L, 11L, 7L, 7L, 2L, 9L, 20L, 2L, 1L, 4L, 12L, 19L, 1L, 14L, 22L, 15L, 6L, 13L,
  18L, 16L, 15L, 21L, 24L, 15L, 2L, 5L, 25L, 1L, 2L, 24L, 4L, 23L, 1L, 19L, 3L, 11L, 12L, 7L, 3L, 2L, 8L, 26L, 7L, 23L,
  15L, 27L, 15L, 2L, 19L, 2L, 1L, 15L, 29L, 15L, 2L, 21L, 28L, 2L, 2L, 2L, 15L, 1L, 29L), .Label = c("0", "2", "24", "26",
  "14", "16", "18", "20", "22", "27", "29", "30", "36", "39", "4", "40", "44", "46", "6", "60", "8", "89", "10", "12",
  "31", "25", "5", "7", "9"), class = "factor"), EV.Goals = structure(c(1L, 2L, 3L, 2L, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, 4L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA), .Label = c("0", "1", "6", ""), class = "factor"), PP.Goals = structure(c(1L, 3L, 2L, 1L, 1L, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 4L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = c("0", "1", "2", ""), class = "factor"), SH.Goals = structure(c(1L,
  1L, 1L, 1L, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 2L, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = c("0", ""), class = "factor"),
  GW = structure(c(1L, 1L, 2L, 1L, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 3L, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = c("0",
  "1", ""), class = "factor"), EV.Assists = structure(c(1L, 4L, 3L, 2L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, 5L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA), .Label = c("0", "1", "11", "4", ""), class = "factor"), PP.Assists = structure(c(1L, 2L,
  1L, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 3L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = c("0", "1", ""), class = "factor"),
  SH.Assists = structure(c(1L, 1L, 1L, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 2L, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = c("0",
  ""), class = "factor"), S = structure(c(1L, 4L, 2L, 3L, 5L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, 6L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA), .Label = c("1", "102", "18", "61", "0", ""), class = "factor"), `S%` = structure(c(1L, 2L, 4L, 3L, 5L, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 5L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = c("0.0", "4.9", "5.6", "6.9", ""), class = "factor"), TOI = structure(c(1L,
  3L, 4L, 2L, 5L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = c("", "127", "685", "830",
  "17"), class = "factor"), ATOI = structure(c(1L, 4L, 3L, 2L, 5L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA), .Label = c("", "10:37", "13:11", "9:23", "4:17"), class = "factor"), Awards = structure(c(1L, 1L,
  1L, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = "", class = "factor"), Playoffs = c(FALSE,
  FALSE, FALSE, FALSE, TRUE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE,
  FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE,
  FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE,
  FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE,
  TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE), GC = structure(c(1L, 3L, 4L, 2L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA), .Label = c("0", "1", "3", "7"), class = "factor"), Adj.G = structure(c(1L, 3L, 4L, 2L, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = c("0", "1", "3", "8"), class = "factor"), Adj.A = structure(c(1L,
  4L, 3L, 2L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = c("0", "1", "12", "6"), class = "factor"),
  Adj.PTS = structure(c(1L, 4L, 3L, 2L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 1L, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = c("0",
  "2", "20", "9"), class = "factor"), Adj.GC = structure(c(1L, 3L, 4L, 2L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA), .Label = c("0", "1", "3", "8"), class = "factor"), OPS = structure(c(1L, 2L, 4L, 3L, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = c("-0.1", "-0.7", "0.0", "0.3"), class = "factor"), DPS = structure(c(1L,
  3L, 4L, 2L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 5L, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Label = c("0.0", "0.2", "0.3",
  "0.4", "0.1"), class = "factor"), PS = structure(c(1L, 2L, 4L, 3L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, 1L, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA), .Label = c("-0.1", "-0.3", "0.2", "0.7"), class = "factor"), Name = c("Antti Aalto", "Antti Aalto",
  "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto",
  "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto",
  "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto",
  "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto",
  "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto",
  "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto", "Antti Aalto",
  "Antti Aalto", "Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott",
  "Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott","Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott",
  "Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott","Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott", "Reg Abbott",
  "Reg Abbott", "Reg Abbott", "Reg Abbott")), .Names = c("Season","Team", "Age", "Lg", "GP", "G", "A", "PTS", "+/-", "PIM", "EV.Goals",
  "PP.Goals", "SH.Goals", "GW", "EV.Assists", "PP.Assists", "SH.Assists","S", "S%", "TOI", "ATOI", "Awards", "Playoffs", "GC", "Adj.G",
  "Adj.A", "Adj.PTS", "Adj.GC", "OPS", "DPS", "PS", "Name"), class = "data.frame", row.names = c(NA,-82L)), GoalieStats = structure(list(Season = structure(1L, .Label = "1943-44", class = "factor"),
  Age = structure(1L, .Label = "32", class = "factor"), Team = structure(1L, .Label = "BOS", class = "factor"),
  Lg = structure(1L, .Label = "NHL", class = "factor"), GP = structure(1L, .Label = "1", class = "factor"),GS = structure(1L, .Label = "", class = "factor"), W = structure(1L, .Label = "0", class = "factor"),
  L = structure(1L, .Label = "1", class = "factor"), `T/O` = structure(1L, .Label = "0", class = "factor"),GA = structure(1L, .Label = "7", class = "factor"), SA = structure(1L, .Label = "", class = "factor"),
  SV = structure(1L, .Label = "", class = "factor"), `SV%` = structure(1L, .Label = "", class = "factor"),GAA = structure(1L, .Label = "7.00", class = "factor"), SO = structure(1L, .Label = "0", class = "factor"),
  MIN = structure(1L, .Label = "60", class = "factor"), QS = structure(1L, .Label = "", class = "factor"),`QS%` = structure(1L, .Label = "", class = "factor"), RBS = structure(1L, .Label = "", class = "factor"),
  `GA%-` = structure(1L, .Label = "", class = "factor"), GSAA = structure(1L, .Label = "", class = "factor"),GPS = structure(1L, .Label = "0.0", class = "factor"), G = structure(1L, .Label = "0", class = "factor"),
  A = structure(1L, .Label = "0", class = "factor"), PTS = structure(1L, .Label = "0", class = "factor"),PIM = structure(1L, .Label = "0", class = "factor"), Awards = structure(1L, .Label = "", class = "factor"),
  Playoffs = FALSE, Name = "George Abbott"), .Names = c("Season","Age", "Team", "Lg", "GP", "GS", "W", "L", "T/O", "GA", "SA","SV", "SV%", "GAA", "SO", "MIN", "QS", "QS%", "RBS", "GA%-",
  "GSAA", "GPS", "G", "A", "PTS", "PIM", "Awards", "Playoffs","Name"), class = "data.frame", row.names = c(NA, -1L)), PlayerMeta = structure(list(
  Name = structure(1:3, .Label = c("Antti Aalto", "George Abbott","Reg Abbott"), class = "factor"), Active = structure(1:3, .Label = c("1998-2001",
  "1944-1944", "1953-1953"), class = "factor"), Position = structure(c(1L,2L, 1L), .Label = c("C", "G"), class = "factor"), Handed = structure(c(1L,
  1L, 1L), .Label = "Left", class = "factor"), HeightImp = structure(1:3, .Label = c("6-1","5-7", "5-11"), class = "factor"), WeightImp = structure(1:3, .Label = c("210",
  "153", "164"), class = "factor"), HeightMetric = structure(1:3, .Label = c("185","170", "180"), class = "factor"), WeightMetric = structure(1:3, .Label = c("95",
  "69", "74"), class = "factor"), Birthdate = structure(1:3, .Label = c("1975-03-04","1911-08-03", "1930-02-04"), class = "factor"), BirthPlace = structure(1:3, .Label = c("Lappeenranta",
  "Sydenham", "Winnipeg"), class = "factor"), Country = structure(c(1L,2L, 2L), .Label = c("FI", "CA"), class = "factor"),
  Province = structure(1:3, .Label = c("", "ON", "MB"), class = "factor"), State = structure(c(1L, 1L, 1L), .Label = "", class = "factor"),
  Deathdate = structure(c(NA_integer_, NA_integer_, NA_integer_), .Label = character(0), class = "factor"), DraftTeam = structure(c(1L,
  NA, NA), .Label = "Anaheim", class = "factor"), DraftRound = structure(c(1L,NA, NA), .Label = "6", class = "factor"), DraftOverall = structure(c(1L,
  NA, NA), .Label = "134", class = "factor"), DraftYear = structure(c(1L,NA, NA), .Label = "1993", class = "factor")), .Names = c("Name",
  "Active", "Position", "Handed", "HeightImp", "WeightImp", "HeightMetric","WeightMetric", "Birthdate", "BirthPlace", "Country", "Province",
  "State", "Deathdate", "DraftTeam", "DraftRound", "DraftOverall","DraftYear"), class = "data.frame", row.names = c(NA, -3L))), .Names = c("PlayerStats",
  "GoalieStats", "PlayerMeta"))

pl_ab <- structure(list(Complete = c("<p class=\"nhl\"><a href=\"/players/a/aaltoan01.html\">Antti Aalto</a> (1998-2001",
  "<p class=\"nhl\"><a href=\"/players/b/babanpe01.html\">Pete Babando</a> (1948-1953"), BlnNHL = structure(c(1L, 1L),
  .Label = c("TRUE", "FALSE"), class = "factor"), URL = c("/players/a/aaltoan01.html", "/players/b/babanpe01.html"), Name = c("Antti Aalto",
  "Pete Babando"), Active = c("1998-2001", "1948-1953")), .Names = c("Complete", "BlnNHL", "URL", "Name", "Active"), row.names = 1:2,
  class = "data.frame")

pl_list_oldnew <- structure(list(Complete = c("<p class=\"nhl\"><a href=\"/players/a/aaltoan01.html\">Antti Aalto</a> (1998-2001",
  "<p class=\"nhl\"><a href=\"/players/a/abdelju01.html\">Justin Abdelkader</a> (2007-2020", "<p class=\"nhl\"><a href=\"/players/a/almasre01.html\">Red Almas</a> (1946-1953"),
  BlnNHL = structure(c(1L, 1L, 1L), .Label = c("TRUE", "FALSE"), class = "factor"), URL = c("/players/a/aaltoan01.html",
    "/players/a/abdelju01.html", "/players/a/almasre01.html"), Name = c("Antti Aalto", "Justin Abdelkader", "Red Almas"),
  Active = c("1998-2001", "2007-2020", "1946-1953")), .Names = c("Complete", "BlnNHL", "URL", "Name", "Active"), row.names = c(NA,
  3L), class = "data.frame")

pl_data_oldnew <- structure(list(PlayerStats = structure(list(Season = structure(c(1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 2L, 2L,
  3L, 3L, 3L, 3L, 3L, 3L, 4L, 4L, 4L, 4L, 4L, 5L, 5L, 5L, 6L, 6L, 6L, 6L, 6L, 6L, 7L, 7L, 8L, 8L, 9L, 9L, 9L, 10L, 10L,
  10L, 11L, 11L, 11L, 11L, 12L, 12L, 13L, 13L, 14L, 15L, 13L, 14L, 14L, 15L, 16L, 16L, 17L, 17L, 18L, 18L, 18L, 18L, 19L,
  19L, 19L, 20L, 20L, 21L, 21L, 21L, 22L, 22L, 23L, 23L, 23L, 24L, 24L, 25L, 25L), .Label = c("1991-92", "1992-93", "1993-94",
  "1994-95", "1995-96", "1996-97", "1997-98", "1998-99", "1999-00", "2000-01", "2001-02", "2002-03", "2003-04", "2004-05",
  "2005-06", "2006-07", "2007-08", "2008-09", "2009-10", "2010-11", "2011-12", "2012-13", "2013-14", "2014-15", "2015-16",
  "2016-17"), class = c("ordered", "factor")), Team = structure(c(4L, 12L, 11L, 4L, 12L, 15L, 15L, 13L, 14L, 11L, 15L,
  15L, 14L, 14L, 7L, 4L, 15L, 14L, 14L, 7L, 4L, 14L, 14L, 7L, 14L, 14L, 14L, 14L, 4L, 4L, 2L, 8L, 8L, 8L, 4L, 8L, 4L, 2L,
  2L, 8L, 6L, 6L, 4L, 4L, 6L, 6L, 14L, 14L, 14L, 14L, 10L, 1L, 1L, 9L, 9L, 16L, 9L, 3L, 5L, 5L, 3L, 3L, 5L, 3L, 3L, 3L,
  3L, 3L, 3L, 16L, 3L, 3L, 3L, 3L, 17L, 3L, 3L, 3L, 3L), .Label = c("Cedar Rapids RoughRiders", "Cincinnati Mighty Ducks",
  "DET", "Finland", "Grand Rapids Griffins", "Jokerit Helsinki", "Kiekko-67 Turku", "MDA", "Michigan State Spartans", "Muskegon Mona Shores",
  "SaiPa Lappeenranta", "SaiPa Lappeenranta Jr.", "SaiPa Lappeenranta U18", "TPS Turku", "TPS Turku Jr.", "United States",
  "USA"), class = "factor"), Age = c(16, 16, 16, 17, 17, 17, 17, 17, 17, 17, 18, 18, 18, 18, 18, 18, 19, 19, 19, 19, 19,
  20, 20, 20, 21, 21, 21, 21, 21, 21, 22, 22, 23, 23, 24, 24, 24, 25, 25, 25, 26, 26, 26, 26, 27, 27, 28, 28, 29, 30, 16,
  17, 17, 18, 19, 19, 20, 20, 21, 21, 21, 21, 22, 22, 22, 23, 23, 24, 24, 24, 25, 25, 26, 26, 26, 27, 27, 28, 28), Lg = structure(c(3L,
  5L, 8L, 3L, 5L, 5L, 5L, 6L, 7L, 8L, 5L, 5L, 7L, 7L, 8L, 16L, 5L, 7L, 7L, 8L, 16L, 7L, 7L, 8L, 4L, 4L, 7L, 7L, 10L, 15L,
  1L, 11L, 11L, 11L, 10L, 11L, 15L, 1L, 1L, 11L, 7L, 7L, 12L, 15L, 7L, 7L, 7L, 7L, 7L, 7L, 9L, 13L, 13L, 2L, 2L, 16L, 2L,
  11L, 1L, 1L, 11L, 11L, 1L, 11L, 11L, 11L, 11L, 11L, 11L, 15L, 11L, 11L, 11L, 11L, 14L, 11L, 11L, 11L, 11L), .Label = c("AHL",
  "CCHA", "EJC-A", "EuroHL", "Fin-Jr.", "Fin-U18", "Finland", "Finland-2", "High-MI", "Nat-Tm", "NHL", "Olympics", "USHL",
  "WC", "WC-A", "WJC-A"), class = "factor"), GP = c(5, 19, 20, 6, 3, 14, 6, 3, 1, 23, 10, 5, 33, 10, 4, 7, 2, 44, 5, 1,
  7, 40, 11, 2, 5, 2, 44, 11, 14, 5, 29, 3, 73, 4, 3, 63, 8, 40, 3, 12, 48, 12, 4, 9, 44, 10, 50, 13, 37, 4, 28, 60, 11,
  44, 38, 7, 42, 2, 76, 10, 2, 10, 33, 50, 11, 74, 11, 81, 5, 8, 48, 12, 70, 5, 7, 71, 5, 82, 5), G = c(2, 10, 6, 1, 4,
  6, 2, 0, 0, 6, 3, 1, 5, 1, 2, 0, 1, 11, 0, 0, 2, 15, 3, 0, 3, 1, 15, 5, 2, 2, 4, 0, 3, 0, 0, 7, 0, 14, 2, 1, 8, 1, 0,
  1, 7, 2, 16, 2, 9, 1, 37, 27, 0, 10, 15, 0, 19, 0, 24, 6, 0, 2, 11, 3, 1, 7, 0, 8, 0, 1, 10, 2, 10, 0, 3, 23, 0, 19,
  1), A = c(0, 10, 6, 3, 2, 8, 2, 1, 0, 8, 8, 4, 9, 1, 2, 2, 2, 7, 1, 1, 3, 16, 5, 2, 3, 1, 19, 6, 4, 0, 9, 0, 5, 0, 1,
  11, 0, 26, 1, 1, 21, 8, 0, 0, 16, 1, 28, 9, 18, 0, 43, 25, 4, 12, 18, 2, 21, 0, 28, 2, 0, 1, 13, 3, 1, 12, 0, 14, 0,
  3, 3, 1, 18, 2, 1, 21, 2, 23, 0), PTS = c(2, 20, 12, 4, 6, 14, 4, 1, 0, 14, 11, 5, 14, 2, 4, 2, 3, 18, 1, 1, 5, 31, 8,
  2, 6, 2, 34, 11, 6, 2, 13, 0, 8, 0, 1, 18, 0, 40, 3, 2, 29, 9, 0, 1, 23, 3, 44, 11, 27, 1, 80, 52, 4, 22, 33, 2, 40,
  0, 52, 8, 0, 3, 24, 6, 2, 19, 0, 22, 0, 4, 13, 3, 28, 2, 4, 44, 2, 42, 1), `+/-` = c(NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, -8, -1, -12, 0, NA, -13, -1,
  27, NA, 1, NA, NA, -3, 1, NA, NA, NA, NA, NA, NA, NA, 20, 3, NA, NA, 1, NA, 0, -2, 2, 0, 2, 6, -11, 1, 15, -4, 4, -5,
  4, 6, 4, 2, 1, 0, 3, -1, -16, -3), PIM = c(14, 44, 20, 18, 2, 18, 8, 2, 0, 14, 14, 12, 16, 4, 27, 8, 2, 18, 2, 29, 18,
  22, 14, 2, 2, 0, 60, 31, 26, 0, 30, 0, 24, 2, 0, 26, 6, 39, 2, 2, 89, 12, 4, 16, 36, 26, 46, 10, 40, 4, NA, 86, 8, 83,
  91, 10, 107, 2, 102, 23, 0, 0, 86, 35, 36, 61, 22, 62, 2, 4, 34, 33, 31, 6, 31, 72, 6, 120, 35), EV.Goals = c(NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0,
  1, 0, NA, 6, NA, NA, 0, 1, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, 0, NA, 5, 0, 2, NA, 3,
  1, 7, 0, 8, 0, NA, 10, 1, 9, 0, NA, 15, 0, 13, 1), PP.Goals = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, 2, 0, NA, 1, NA, NA, 2, 0, NA, NA, NA, NA, NA,
  NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, 0, NA, 1, 0, 0, NA, 0, 0, 0, 0, 0, 0, NA, 0, 0, 1, 0, NA, 8, 0, 6, 0),
  SH.Goals = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, 0, 0, 0, NA, 0, NA, NA, 0, 0, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, NA,
    NA, 0, NA, 0, 0, 0, NA, 0, 0, 0, 0, 0, 0, NA, 0, 1, 0, 0, NA, 0, 0, 0, 0), GW = c(NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, 0, 0, NA, 1, NA, NA,
    0, 0, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, 0, NA, 2, 0, 0, NA, 0, 0, 1, 0, 1, 0, NA,
    0, 0, 3, 0, NA, 5, 0, 4, 0), EV.Assists = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, 4, NA, NA, 11, NA, NA, NA, 1, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, 0, NA, NA, 3, NA, 11, NA, 14, NA, NA, 3, NA, 16, NA, NA, 15, NA,
    16, NA), PP.Assists = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, 0, 1, NA, NA, 0, NA, NA, NA, 0, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, 0, NA, NA, 0, NA, NA, 0, NA, 0, NA, 0, NA, NA, 0, NA, 2, NA, NA, 6, NA, 7, NA), SH.Assists = c(NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, 0, 0, NA, NA, 0, NA, NA, NA, 0, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA,
    0, NA, NA, 0, NA, 1, NA, 0, NA, NA, 0, NA, 0, NA, NA, 0, NA, 0, NA), S = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 1, 61, 0, NA, 102, NA, NA, NA,
    18, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 22, NA, NA, NA, NA, 6, NA, 42, 2, 11, NA, 79, 12, 129, 17, 121,
    7, NA, 96, 33, 147, 7, NA, 154, 6, 155, 9), `S%` = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, 4.9, NA, NA, 6.9, NA, NA, NA, 5.6, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, 0, NA, 14.3, 0, 18.2, NA, 3.8, 8.3, 5.4, 0, 6.6, 0, NA, 10.4,
    6.1, 6.8, 0, NA, 14.9, 0, 12.3, 11.1), TOI = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 685, 17, NA, 830, NA, NA, NA, 127, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 24, NA, NA, 19, 70, NA, 530, 83, 910, 148, 997, 63, NA, 711, 203,
    1070, 79, NA, 1272, 84, 1512, 96), ATOI = c(0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 9.38333333333333, 4.28333333333333, 0, 13.1833333333333, 0, 0, 0, 10.6166666666667, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12.2166666666667, 0, 0, 9.3, 6.96666666666667, 0, 10.5833333333333,
    7.5, 12.3, 13.45, 12.3166666666667, 12.5166666666667, 0, 14.8166666666667, 16.95, 15.2833333333333, 15.8, 0, 17.9166666666667,
    16.7333333333333, 18.4333333333333, 19.15), Playoffs = c("FALSE", "FALSE", "FALSE", "FALSE", "FALSE", "FALSE", "TRUE",
    "FALSE", "FALSE", "FALSE", "FALSE", "TRUE", "FALSE", "TRUE", "FALSE", "FALSE", "FALSE", "FALSE", "TRUE", "FALSE",
    "FALSE", "FALSE", "TRUE", "FALSE", "FALSE", "TRUE", "FALSE", "TRUE", "FALSE", "FALSE", "FALSE", "FALSE", "FALSE",
    "TRUE", "FALSE", "FALSE", "FALSE", "FALSE", "TRUE", "FALSE", "FALSE", "TRUE", "FALSE", "FALSE", "FALSE", "TRUE",
    "FALSE", "TRUE", "FALSE", "FALSE", "FALSE", "FALSE", "TRUE", "FALSE", "FALSE", "FALSE", "FALSE", "FALSE", "FALSE",
    "TRUE", "FALSE", "TRUE", "FALSE", "FALSE", "TRUE", "FALSE", "TRUE", "FALSE", "TRUE", "FALSE", "FALSE", "TRUE", "FALSE",
    "TRUE", "FALSE", "FALSE", "TRUE", "FALSE", "TRUE"), GC = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, 3, NA, NA, 7, NA, NA, NA, 1, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, 0, NA, NA, 2, NA, 7, NA, 8, NA, NA, 6, NA, 10, NA,
    NA, 18, NA, 17, NA), Adj.G = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, 3, NA, NA, 8, NA, NA, NA, 1, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, 0, NA, NA, 0, NA, NA, 3, NA, 8, NA, 9, NA, NA, 19, NA, 11, NA, NA, 26, NA, 21, NA), Adj.A = c(NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, 0, 6, NA, NA, 12, NA, NA, NA, 1, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA,
    0, NA, NA, 3, NA, 13, NA, 15, NA, NA, 6, NA, 20, NA, NA, 23, NA, 26, NA), Adj.PTS = c(NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, 9, NA, NA, 20,
    NA, NA, NA, 2, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, 0, NA, NA, 6, NA, 21,
    NA, 24, NA, NA, 25, NA, 31, NA, NA, 49, NA, 47, NA), Adj.GC = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, 3, NA, NA, 8, NA, NA, NA, 1, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, 0, NA, NA, 2, NA, 8, NA, 9, NA, NA, 12, NA, 11,
    NA, NA, 20, NA, 19, NA), OPS = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, -0.1, -0.7, NA, NA, 0.3, NA, NA, NA, 0, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, -0.1, NA, NA, -0.1, NA, NA, -0.6, NA, 0.2, NA, 0.5, NA, NA, 0.6, NA, 1.3, NA,
    NA, 4, NA, 2.7, NA), DPS = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, 0.3, NA, NA, 0.4, NA, NA, NA, 0.2, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, 0, NA, NA, 0.2, NA, 1.5, NA, 1.1, NA, NA, 1.1, NA, 1.2, NA, NA, 1.6, NA,
    1.1, NA), PS = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, -0.1, -0.3, NA, NA, 0.7, NA, NA, NA, 0.2, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, 0, NA, NA, 0, NA, NA, -0.3, NA, 1.7, NA, 1.6, NA, NA, 1.7, NA, 2.6, NA, NA, 5.6, NA, 3.8,
    NA), Name = structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L,
    1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L,
    2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L), .Label = c("Antti Aalto",
    "Justin Abdelkader", "Red Almas"), class = "factor"), TSA = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 8, NA, NA, 7, 15, NA, 141, 19, 226, 26, 196, 15, NA,
    147, 49, 223, 13, NA, 237, 11, 239, 11), FOW = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 5, NA, NA, 4, 17, NA, 148, 35, 227, 43, 239, 24, NA, 65, 2, 23, 0,
    NA, 7, 0, 5, 0), FOL = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, 7, NA, NA, 3, 22, NA, 170, 32, 203, 34, 213, 25, NA, 60, 1, 32, 1, NA, 8, 0, 9, 1), `FO%` = c(NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 41.7,
    NA, NA, 57.1, 43.6, NA, 46.5, 52.2, 52.8, 55.8, 52.9, 49, NA, 52, 66.7, 41.8, 0, NA, 46.7, NA, 35.7, 0), HIT = c(NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 5, NA,
    NA, 3, 32, NA, 152, 31, 188, 28, 148, 9, NA, 120, 61, 172, 21, NA, 153, 29, 207, 18), BLK = c(NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, 0, 2, NA,
    20, 4, 39, 6, 42, 2, NA, 13, 9, 31, 2, NA, 28, 3, 44, 3), TK = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 1, NA, NA, 0, 1, NA, 7, 3, 17, 3, 16, 0, NA, 10,
    2, 21, 1, NA, 16, 0, 23, 1), GV = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, 1, 5, NA, 7, 5, 20, 7, 14, 0, NA, 10, 1, 15, 0, NA, 29, 1, 29, 1), CF = c(NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 19, NA,
    NA, 22, NA, NA, 409, NA, 765, NA, 794, NA, NA, 614, NA, 841, NA, NA, 909, NA, 986, NA), CA = c(NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 18, NA, NA, 9, NA, NA,
    376, NA, 628, NA, 698, NA, NA, 479, NA, 821, NA, NA, 704, NA, 995, NA), `CF%` = c(NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 51.4, NA, NA, 71, NA, NA, 52.1, NA,
    54.9, NA, 53.2, NA, NA, 56.2, NA, 50.6, NA, NA, 56.4, NA, 49.8, NA), `CF%rel` = c(NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, -10.2, NA, NA, 14.6, NA, NA, -2.2,
    NA, -0.4, NA, -3.2, NA, NA, 3.8, NA, -3.1, NA, NA, 4, NA, -2.9, NA), FF = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 18, NA, NA, 16, NA, NA, 303, NA, 599, NA,
    589, NA, NA, 451, NA, 645, NA, NA, 668, NA, 735, NA), FA = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 17, NA, NA, 8, NA, NA, 280, NA, 478, NA, 524, NA, NA,
    353, NA, 629, NA, NA, 540, NA, 782, NA), `FF%` = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 51.4, NA, NA, 66.7, NA, NA, 52, NA, 55.6, NA, 52.9, NA, NA, 56.1,
    NA, 50.6, NA, NA, 55.3, NA, 48.5, NA), `FF%rel` = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, -11.6, NA, NA, 16.7, NA, NA, -1.3, NA, 0.7, NA, -3.7, NA, NA, 3.6,
    NA, -2.3, NA, NA, 4.1, NA, -2.7, NA), `oiSH%` = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 7.7, NA, NA, 0, NA, NA, 4.3, NA, 8.3, NA, 7.4, NA, NA, 7.3, NA, 8.5,
    NA, NA, 9.7, NA, 7.8, NA), `oiSV%` = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, 90.9, NA, NA, 100, NA, NA, 90, NA, 93.6, NA, 93.1, NA, NA, 93.7, NA, 92.4, NA,
    NA, 90.5, NA, 90.5, NA), PDO = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, 98.6, NA, NA, 100, NA, NA, 94.3, NA, 101.9, NA, 100.5, NA, NA, 101, NA, 100.9, NA,
    NA, 100.2, NA, 98.3, NA), `oZS%` = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, 60, NA, NA, 66.7, NA, NA, 66.3, NA, 58.8, NA, 59.3, NA, NA, 52.2, NA, 52.5, NA,
    NA, 63.6, NA, 58.7, NA), `dZS%` = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
    NA, NA, NA, NA, NA, NA, NA, NA, 40, NA, NA, 33.3, NA, NA, 33.7, NA, 41.2, NA, 40.7, NA, NA, 47.8, NA, 47.5, NA, NA,
    36.4, NA, 41.3, NA)), .Names = c("Season", "Team", "Age", "Lg", "GP", "G", "A", "PTS", "+/-", "PIM", "EV.Goals",
  "PP.Goals", "SH.Goals", "GW", "EV.Assists", "PP.Assists", "SH.Assists", "S", "S%", "TOI", "ATOI", "Playoffs", "GC", "Adj.G",
  "Adj.A", "Adj.PTS", "Adj.GC", "OPS", "DPS", "PS", "Name", "TSA", "FOW", "FOL", "FO%", "HIT", "BLK", "TK", "GV", "CF",
  "CA", "CF%", "CF%rel", "FF", "FA", "FF%", "FF%rel", "oiSH%", "oiSV%", "PDO", "oZS%", "dZS%"), row.names = c(8L, 6L, 7L,
  12L, 14L, 15L, 41L, 9L, 11L, 10L, 17L, 42L, 18L, 43L, 16L, 19L, 20L, 22L, 44L, 21L, 23L, 25L, 45L, 24L, 27L, 47L, 26L,
  46L, 29L, 28L, 30L, 1L, 2L, 5L, 32L, 3L, 31L, 33L, 48L, 4L, 34L, 49L, 35L, 36L, 37L, 50L, 38L, 51L, 39L, 40L, 70L, 71L,
  80L, 72L, 73L, 74L, 75L, 52L, 76L, 81L, 53L, 62L, 77L, 54L, 63L, 55L, 64L, 56L, 65L, 78L, 57L, 66L, 58L, 67L, 79L, 59L,
  68L, 60L, 69L), class = "data.frame"), GoalieStats = structure(list(Season = structure(c(1L, 1L, 1L, 2L, 3L, 3L, 4L,
  4L, 5L, 5L, 5L, 6L, 7L, 7L, 8L, 8L, 9L, 9L, 10L, 11L, 11L, 12L, 12L, 13L), .Label = c("1941-42", "1942-43", "1943-44",
  "1945-46", "1946-47", "1947-48", "1948-49", "1949-50", "1950-51", "1951-52", "1952-53", "1953-54", "1954-55"), class = c("ordered",
  "factor")), Age = c(17, 17, 17, 18, 19, 19, 21, 21, 22, 22, 22, 23, 24, 24, 25, 25, 26, 26, 27, 28, 28, 29, 29, 30),
  Team = structure(c(NA, NA, NA, NA, NA, NA, NA, NA, NA, 3L, 3L, NA, NA, NA, NA, NA, NA, NA, NA, NA, 3L, NA, NA, NA), .Label = c("Cedar Rapids RoughRiders",
    "Cincinnati Mighty Ducks", "DET", "Finland", "Grand Rapids Griffins", "Jokerit Helsinki", "Kiekko-67 Turku", "MDA",
    "Michigan State Spartans", "Muskegon Mona Shores", "SaiPa Lappeenranta", "SaiPa Lappeenranta Jr.", "SaiPa Lappeenranta U18",
    "TPS Turku", "TPS Turku Jr.", "United States", "USA"), class = "factor"), Lg = structure(c(NA, NA, NA, NA, NA, NA,
    NA, NA, 1L, 11L, 11L, 1L, 1L, 1L, 1L, 1L, 1L, 11L, 1L, 1L, 11L, 1L, NA, NA), .Label = c("AHL", "CCHA", "EJC-A", "EuroHL",
    "Fin-Jr.", "Fin-U18", "Finland", "Finland-2", "High-MI", "Nat-Tm", "NHL", "Olympics", "USHL", "WC", "WC-A", "WJC-A"),
    class = "factor"), GP = c(3, 8, 6, 2, 17, 4, 35, 3, 64, 1, 5, 65, 66, 7, 55, 2, 70, 1, 68, 53, 1, 9, 56, 2), GS = c(NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_), W = c(0,
    6, 4, NA, 16, 1, 14, 0, 33, 0, 1, 31, 39, 3, 29, 0, 32, 0, 28, 23, 0, 4, 20, 1), L = c(2, 2, 1, NA, 1, 3, 19, 3,
    18, 1, 3, 28, 18, 4, 21, 2, 34, 1, 39, 29, 0, 5, 26, 0), `T/O` = c(1, 0, 1, NA, 0, 0, 2, 0, 13, 0, NA, 6, 9, 0, 5,
    0, 4, 0, 1, 1, 1, 0, 10, 1), GA = c(12, 22, 22, 8, 71, 21, 147, 14, 215, 5, 13, 246, 189, 22, 182, 10, 251, 5, 262,
    200, 3, 45, 174, 9), SA = c(NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_), SV = c(NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_), `SV%` = c(NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_), GAA = c(3.79, 2.69, 3.67, 4, 4.14, 5.25, 4.08, 4.67, 3.36, 5,
    2.97, 3.79, 2.89, 2.84, 3.31, 5, 3.52, 5, 3.83, 3.75, 3, 5, 3.11, 4.5), SO = c(0, 0, 0, 0, 0, 0, 1, 0, 3, 0, 0, 0,
    5, 0, 4, 0, 3, 0, 2, 1, 0, 0, 2, 0), MIN = c(190, 490, 360, 120, 1030, 240, 2160, 180, 3840, 60, 263, 3890, 3920,
    465, 3300, 120, 4280, 60, 4100, 3200, 60, 540, 3360, 120), QS = c(NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_), `QS%` = c(NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_), RBS = c(NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_), `GA%-` = c(NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_), GSAA = c(NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_,
    NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_, NA_real_), GPS = c(NA,
    NA, NA, NA, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA, NA, NA, -0.1, NA, NA, 0.1, NA, NA, NA), G = c(NA, NA, NA,
    NA, NA, NA, NA, NA, NA, 0, 0, NA, NA, NA, NA, NA, NA, 0, NA, NA, 0, NA, NA, NA), A = c(NA, NA, NA, NA, NA, NA, NA,
    NA, NA, 0, 0, NA, NA, NA, NA, NA, NA, 0, NA, NA, 0, NA, NA, NA), PTS = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, 0,
    NA, NA, NA, NA, NA, NA, 0, NA, NA, 0, NA, NA, NA), PIM = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, 0, 0, NA, NA, NA,
    NA, NA, NA, 0, NA, NA, 0, NA, NA, NA), Playoffs = c("TRUE", "FALSE", "TRUE", "FALSE", "FALSE", "TRUE", "FALSE", "TRUE",
    "FALSE", "FALSE", "TRUE", "FALSE", "FALSE", "TRUE", "FALSE", "TRUE", "FALSE", "FALSE", "FALSE", "FALSE", "FALSE",
    "FALSE", "FALSE", "FALSE"), Name = structure(c(3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L,
    3L, 3L, 3L, 3L, 3L, 3L, 3L), .Label = c("Antti Aalto", "Justin Abdelkader", "Red Almas"), class = "factor")), .Names = c("Season",
  "Age", "Team", "Lg", "GP", "GS", "W", "L", "T/O", "GA", "SA", "SV", "SV%", "GAA", "SO", "MIN", "QS", "QS%", "RBS", "GA%-",
  "GSAA", "GPS", "G", "A", "PTS", "PIM", "Playoffs", "Name"), row.names = c(20L, 5L, 19L, 6L, 7L, 21L, 8L, 22L, 9L, 1L,
  4L, 10L, 11L, 23L, 12L, 24L, 13L, 2L, 14L, 15L, 3L, 16L, 17L, 18L), class = "data.frame"), PlayerMeta = structure(list(Name = structure(1:3,
  .Label = c("Antti Aalto", "Justin Abdelkader", "Red Almas"), class = "factor"), Position = c("C", "LW", "G"), Handed = c("Left",
  "Left", "Right"), HeightImp = c(73, 74, 69), WeightImp = c(210, 218, 160), HeightMetric = c(185, 188, 175), WeightMetric = c(95,
  98, 72), Birthdate = c("1888", "6264", "-16686"), BirthPlace = structure(1:3, .Label = c("Lappeenranta", "Muskegon",
  "Saskatoon"), class = "factor"), Country = structure(c(2L, 3L, 1L), .Label = c("CA", "FI", "US"), class = "factor"),
  Province = structure(c(1L, 1L, 2L), .Label = c("", "SK"), class = "factor"), State = structure(c(1L, 2L, 1L), .Label = c("",
    "MI"), class = "factor"), Deathdate = c(NA_character_, NA_character_, NA_character_), DraftTeam = structure(c(1L,
    2L, NA), .Label = c("Anaheim", "Detroit"), class = "factor"), DraftRound = c(NA_real_, NA_real_, NA_real_), DraftOverall = c(134,
    42, NA), DraftYear = c(1993, 2005, NA), ActiveStart = c(1998, 2007, 1946), ActiveEnd = c(2001, 2017, 1953)), .Names = c("Name",
  "Position", "Handed", "HeightImp", "WeightImp", "HeightMetric", "WeightMetric", "Birthdate", "BirthPlace", "Country",
  "Province", "State", "Deathdate", "DraftTeam", "DraftRound", "DraftOverall", "DraftYear", "ActiveStart", "ActiveEnd"),
  row.names = c(NA, 3L), class = "data.frame")), .Names = c("PlayerStats", "GoalieStats", "PlayerMeta"))

proc_names <- list(lnames = c("PlayerStats", "GoalieStats", "PlayerMeta"), pnames = c("Season", "Team", "Age", "Lg", "GP",
  "G", "A", "PTS", "+/-", "PIM", "EV.Goals", "PP.Goals", "SH.Goals", "GW", "EV.Assists", "PP.Assists", "SH.Assists", "S",
  "S%", "TOI", "ATOI", "Playoffs", "GC", "Adj.G", "Adj.A", "Adj.PTS", "Adj.GC", "OPS", "DPS", "PS", "Name"), gnames = c("Season", "Age", "Team", "Lg", "GP", "GS", "W", "L", "T/O", "GA", "SA", "SV", "SV%", "GAA",
  "SO", "MIN", "QS", "QS%", "RBS", "GA%-", "GSAA", "GPS", "G", "A", "PTS", "PIM", "Playoffs", "Name"), mnames = c("Name",
  "Position", "Handed", "HeightImp", "WeightImp", "HeightMetric", "WeightMetric", "Birthdate", "BirthPlace", "Country",
  "Province", "State", "Deathdate", "DraftTeam", "DraftRound", "DraftOverall", "DraftYear", "ActiveStart", "ActiveEnd"))