r - 修改列表的非递归版本？

Question

modifyList 的行为是递归地修改列表 - 即，在这种情况下，fixed 是一个嵌套列表，也将被“修改”:

default.options <- list(a = 1, b = 2, c = "hello", fixed = list(a = 1))
user.options <- list(b = 3, e = 0, fixed = list())

opts <- modifyList(default.options, user.options)
dput(opts)
# list(a = 1, b = 3, c = "hello", fixed = list(a = 1), e = 0)

但是，如果我不希望它递归地跟随子列表 fixed ，而是将其作为一个整体替换，即期望的结果是这样的，该怎么办？ :

list(a = 1, b = 3, c = "hello", fixed = list(), e = 0)

是否有一种简单的方法来进行这种非递归列表修改？

Answer 1

您可以简单地执行以下操作:

default.options[names(user.options)] <- user.options

identical(default.options, list(a = 1, b = 3, c = "hello", fixed = list(), e = 0))
[1] TRUE