从数据帧中提取变量值的函数

Question

我有包含variable_name和variable_values的R data.frame。我正在写一个函数来提取每个variable_name并分配相应的变量值并将其保存在内存中供以后使用。不过，我不断收到错误消息，因为这“在as.name（DF）错误< - DF [I，2]：找不到函数 “as.name < - ” 能否请你帮

实例？ ： df <- data.frame(name=c("Jane", "Bush","Bob", "Job"), age=c(12 , 34, 20, 50))

我想每个名称转让其相应年龄这样

Jane <- 12 Bush <- 34 Bob <- 20 Job <- 50

这里是我的代码开始：

splitobs <- function(df){ 
for(i in 1:nrow(df)){ 
noquote(as.name(df[i, 1]) <- df[i, 2] 
print() 
    } 
} 

splitobs(df)enter code here 

Answer 1

我们使用'name'设置'age'的名字，转换为list并使用list2env在全局环境中创建多个对象（尽管不推荐）。

list2env(as.list(setNames(df$age, df$name)), envir=.GlobalEnv) 
Jane 
#[1] 12 

或在for循环中使用assign。

for(i in 1:nrow(df)){ 
assign(as.character(df$name[i]), df$age[i]) 
}