add subsetting vectors lesson to r programming