0

我有一个包含命名对象的列表,我想通过从字符串中提取列表索引名称来分配这些对象。使用以下方法,我收到以下错误消息:错误:尝试应用非功能。

因此:

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 对象节点。出于某种原因,您可以使用列表索引名称进行分配,但不能使用列表索引整数。如果有另一种解决方法可以在这种情况下工作,我全神贯注。

4

1 回答 1

1

在这种情况下,不要使用$子集,使用[

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"
于 2019-07-18T10:14:00.140 回答