我有一个包含命名对象的列表,我想通过从字符串中提取列表索引名称来分配给这些对象。使用以下方法,我收到以下错误消息:错误:尝试应用非函数。
因此:
test <- list(a = 'a', b = 'b', c = 'c')
### works fine
test$a <- 'foo'
### What I would like to be able to do
n <- names(test)[1]
test$parse(text = n) <- 'foo'
PS:这是使用 Bnlearn 库将自定义系数分配给 bn.fit 对象节点。出于某种原因,您可以使用列表索引名称进行分配,但不能使用列表索引整数进行分配。如果有另一种解决方法可以在这种情况下工作,我全都听着。
在这种情况下,不要使用 $
来子集,使用 [
test <- list(a = 'a', b = 'b', c = 'c')
test[n]$a <- "foo"
test
#$a
#[1] "foo"
#$b
#[1] "b"
#$c
#[1] "c"
或[[
test[[n]] <- "foo"