if (FALSE) {
# Get all matches between India and Australia
matches <- getAllMatchesBetweenTeams("Australia","India",dir="../data")
teamBowlersWicketKindOppnAllMatches(matches,"India","Australia",plot=TRUE)
m <- teamBowlersWicketKindOppnAllMatches(matches,"Australia","India",plot=FALSE)
teamBowlersWicketKindOppnAllMatches(matches,"Australia","India",plot=TRUE)
}
Run the code above in your browser using DataLab