Update rem.R