Using R for Spatial Shift-Share Analysis