data(CO2)
qplot(data = CO2,
      x = conc,
      xlab = "CO2 Concentration (mL/L)",
      y = uptake,
      ylab = "CO2 Uptake (umol/m^2 sec)",
      main = "CO2 uptake in grass plants")