Create teamPitching.R