almost done with corr, this is the technically correct version that subsets for !is.na(nitrate) && !is.na(sulfate), but whatever