• The National Hockey League Foreign Player Statistics

    • Kelsi Stewart

    Dallas Stars

    Findings

    Centers

    Code

    nhlDALc - filter(nhl1, Team == "DAL", Position == "C") DALpMc - ggplot(data=nhlDALc, mapping = aes(x = Last, y = PlusMinus, fill = Nat, color = Nat)) + geom_bar(stat = "identity") + coord_flip() DALpMc DALpMc + labs(x = "Player") + labs(y = "+/-") + labs(title = "Dallas Centers Plus/Minus") + labs(fill = "Nationality")+ labs(color = "Nationality")

    Code

    DALpoiC - ggplot(data=nhlDALc, mapping = aes(x = Last , y = Points, fill = Nat, color = Nat)) + geom_bar(stat = "identity") + coord_flip() DALpoiC DALpoiC + labs(x = "Player") + labs(y = "Goals and Total Assists") + labs(title = "Dallas Centers Points") + labs(fill = "Nationality")+ labs(color = "Nationality")

    Left Wings

    Code

    nhlDALlw - filter(nhl1, Team == "DAL", Position == "LW") DALpMlw - ggplot(data=nhlDALlw, mapping = aes(x = Last , y = PlusMinus, fill = Nat, color = Nat)) + geom_bar(stat = "identity") + coord_flip() DALpMlw + labs(x = "Player") + labs(y = "+/-") + labs(title = "Dallas Left Wing Plus/Minus") + labs(fill = "Nationality")+ labs(color = "Nationality")

    Code

    DALpoilw - ggplot(data=nhlDALlw, mapping = aes(x = Last , y = Points, fill = Nat, color = Nat)) + geom_bar(stat = "identity") + coord_flip() DALpoilw DALpoilw + labs(x = "Player") + labs(y = "Goals and Total Assists") + labs(title = "Dallas Left Wing Points") + labs(fill = "Nationality")+ labs(color = "Nationality")

    Right Wings

    Code

    nhlDALrw - filter(nhl1, Team == "DAL", Position == "RW") DALpMrw - ggplot(data=nhlDALrw, mapping = aes(x = Last , y = PlusMinus, fill = Nat, color = Nat)) + geom_bar(stat = "identity") + coord_flip() DALpMrw + labs(x = "Player") + labs(y = "+/-") + labs(title = "Dallas Right Wing Plus/Minus") + labs(fill = "Nationality")+ labs(color = "Nationality")

    Code

    DALpoirw - ggplot(data=nhlDALrw, mapping = aes(x = Last , y = Points, fill = Nat, color = Nat)) + geom_bar(stat = "identity") + coord_flip() DALpoirw DALpoirw + labs(x = "Player") + labs(y = "Goals and Total Assists") + labs(title = "Dallas Right Wing Points") + labs(fill = "Nationality")+ labs(color = "Nationality")

    Defense

    Code

    nhlDALd - filter(nhl1, Team == "DAL", Position == "D") DALpMd - ggplot(data=nhlDALd, mapping = aes(x = Last , y = PlusMinus, fill = Nat, color = Nat)) + geom_bar(stat = "identity") + coord_flip() DALpMd + labs(x = "Player") + labs(y = "+/-") + labs(title = "Dallas Defense Plus/Minus") + labs(fill = "Nationality")+ labs(color = "Nationality")

    Code

    DALpoiD - ggplot(data=nhlDALd, mapping = aes(x = Last , y = Dpoint, fill = Nat, color = Nat)) + geom_bar(stat = "identity") + coord_flip() DALpoiD DALpoiD + labs(x = "Player") + labs(y = "Goals and Total Assists") + labs(title = "Dallas Defensive Points") + labs(fill = "Nationality")+ labs(color = "Nationality")