This function computes returns the wickets taken and runs conceded bowlers in a match between 2 teams.
The user can choose to plot or return a dataframe
## Not run:
#Get the match details
a <- getMatchDetails("England","Pakistan","2006-09-05",dir="../temp")
teamBowlingWicketRunsMatch(a,"England","Pakistan",plot=FALSE)
teamBowlingWicketRunsMatch(a,"Pakistan","England")
## End(Not run)