R simulation update