Update scwi.R