Update subsettingExample.R