if (FALSE) {
#Get all matches between India and Autralia
matches <- getAllMatchesBetweenTeams("Australia","India",dir="../data")
# Or load directly from saved file
# load("India-Australia-allMatches.RData")
teamBowlingPerfOppnAllMatches(matches,"India","Australia")
teamBowlingPerfOppnAllMatches(matches,main="Australia",opposition="India")
}
Run the code above in your browser using DataLab