Update spm.r