tasseled cap with raster overlay()