if (FALSE) {
# Get all matches between India and Australia
matches <- getAllMatchesBetweenTeams("Australia","India",dir="../data")
#Display top 20
teamBowlersWicketsOppnAllMatches(matches,"India","Australia")
#Display and plot top 10
teamBowlersWicketsOppnAllMatches(matches,"Australia","India",top=10)
#Do not plot but return as dataframe
teamBowlersWicketsOppnAllMatches(matches,"India","Australia",plot=FALSE)
}
Run the code above in your browser using DataLab