如何逐字排序文本值

Question

在我的问题中，向量的每个值都是由多个单词组成的文本。我试着逐字排序文本。我不在乎对矢量进行排序。 e.g。

vect <- c("tim is a man", "sam was a studend", "my young daughter")

如何得到这样的vect：

"a is man tim"
"a sam student was"
"daughter my young"

感谢您的帮助。

Answer 1

我们可以将字符串拆分为子字符串，然后执行sort

sapply(strsplit(vect, "\\s+"), function(x) paste(sort(x), collapse=' '))
#[1] "a is man tim"      "a sam studend was" "daughter my young"