結果 : r remove empty columns from dataframe