Save as R-object added