Chapter 7 Read the data

rm(list=ls())

fillColor = "#FFA07A"
fillColor2 = "#F1C40F"

players = read_csv("input/wta/players.csv")
rankings = read_csv("input/wta/rankings.csv")
matches = read_csv("input/wta/matches.csv")

matches$tourney_name = str_replace(matches$tourney_name,"Us Open","US Open")