Fix typo in R Programming->Subsetting Vectors

Replace postive with positive