update RData code