結果 : r loop over dataframe rows