Update dataframe.R