使用字符值作为对象名称

Question

我想用中的字符，矢量字符的名称的对象 目标是获得

first as say "d","e","a","t" etc. 

尝试过这种方法，但很显然缺少一些功能，以适用于X [我]

x <- c("first","second","third"..) 

for (i in 1:length(x)) { 
x[i] <- sample(letters,4) 
} 

TIA

Answer 1

你正在寻找的功能是assign()：

> x <- c("first","second","third") 
> for (i in 1:length(x)) { 
+ assign(x[i], sample(letters,4)) 
+ } 
> 
> ls() 
[1] "first" "i"  "second" "third" "x"  
> first 
[1] "t" "d" "u" "j" 
> second 
[1] "o" "i" "p" "l" 
> third 
[1] "w" "v" "r" "n" 

作为替代方案，你可以建立这些矢量的列表的不同元素：

> mylist <- list() 
> for (i in 1:length(x)) { 
+ mylist[[x[i]]] <- sample(letters,4) 
+ } 
> mylist 
$first 
[1] "e" "l" "y" "d" 

$second 
[1] "t" "o" "k" "h" 

$third 
[1] "g" "x" "p" "b" 

Answer 2

你不说你会对此对象做什么。您可以通过使用一个名为向量得到最简单的结构：

names(x) <- x 
x[] <- sample(letters, 4) 

如果你不使用的LHS配对支架，整个矢量被替换和名称都将丢失。您现在可以使用带引号的名称访问这些值：

> x 
first second third fourth 
    "w" "c" "r" "x" 
> x["second"] 
second 
    "c"