R中同一列的两个单词的交换

Question

我有一个文件，其中一列包含两个单词，我想交换这两个单词。

str_split(d$brand," ")
d$brand<-  cbind(unlist(str_split(d$brand," "))[2],unlist(str_split(d$brand," "))[1])