powered by
library(cranvas) qtennis <- qdata(tennis) qscatter(first.serve.pts, second.serve.pts, data = qtennis) qscatter(matches, sets, data = qtennis)
Run the code above in your browser using DataLab