Create switching_ise.R