Save data as tbl_df. Use tidyr