if (FALSE) {
#Get all matches between India and other opposition
matches <-getAllMatchesAllOpposition("India",dir="../data/",save=TRUE)
# Or load directly from saved file
# load("allMatchesAllOpposition-India.RData")
teamBowlingWicketRunsAllOppnAllMatches(matches,t1="India",t2="All",plot=TRUE)
m <-teamBowlingWicketRunsAllOppnAllMatches(matches,t1="India",t2="All",plot=FALSE)
}
Run the code above in your browser using DataLab