if (FALSE) {
# Get the match between England and Pakistan
a <- getMatchDetails("England","Pakistan","2006-09-05",dir="../temp")
teamBowlersVsBatsmenMatch(a,"Pakistan","England")
teamBowlersVsBatsmenMatch(a,"England","Pakistan")
m <- teamBowlersVsBatsmenMatch(a,"Pakistan","England")
}
Run the code above in your browser using DataLab