Created top-level function to load data, do sparse PCA and save results