Update Stoch.R