Update subset.rspec.R

checks if 'wl' present in subsetting condition, adds warning if subset and # spectra not equal