SAPS R Package