R Script to calculate SVD and Workspace with the matrix.. Enjoy 