R:如何使用矢量项作为列表项的名称

时间:2015-04-03 07:30:50

标签: r

我正在尝试在文本正文中构建一个彼此接近的单词字典。

假设我有这个:

> words
 [1] "thanks"  "fish"   "long"      

然后我希望能够做到这样的事情(在apply构造中):

dictionary$words[i] <- words[-i]

并以此结束:

> dictionary
$thanks
[1] "fish" "long"

$fish
[1] "thanks" "long"  

$long
[1] "thanks" "fish" 

我尝试了assign,但我无法做到正确,我甚至不确定这是否可行。

1 个答案:

答案 0 :(得分:2)

尝试:

setNames(lapply(words, function(u) words[words!=u]), words)

#$thanks
#[1] "fish" "long"

#$fish
#[1] "thanks" "long"  

#$long
#[1] "thanks" "fish"