Create list2dataframe.r