if (FALSE) {
# Get all matches for team India against all oppositions
d <- teamBatsmanVsBowlersAllOppnAllMatchesRept(matches,"India",rank=1,dispRows=50)
#Plot the partnerships
teamBatsmenVsBowlersAllOppnAllMatchesPlot(d)
#Do not plot but get the dataframe
e <- teamBatsmenVsBowlersAllOppnAllMatchesPlot(d,plot=FALSE)
}
Run the code above in your browser using DataLab