相关疑难解决方法(0)

如果我有一些R列表mylist,你可以obj像这样附加一个项目:

mylist[[length(mylist)+1]] <- obj

但肯定有一些更紧凑的方式.当我在R的新人时,我尝试这样写lappend():

lappend <- function(lst, obj) {
    lst[[length(lst)+1]] <- obj
    return(lst)
}

但是当然由于R的逐个调用语义而无法正常工作(lst在调用时有效复制,所以更改lst在范围之外是不可见的lappend().我知道你可以在R函数中做环境黑客攻击到达外部你的函数范围和mutate调用环境,但这似乎是一个大锤子写一个简单的追加函数.

任何人都可以建议一个更美丽的方式吗？奖励点,如果它适用于矢量和列表.

我有两个带有命名元素的列表:

a <- list(a=1, b=2)
b <- list(b=3, c=4)

我想组合这些列表,以便具有相同名称的任何元素都将被列表b覆盖,所以我得到了这个:

list(a=1, b=3, c=4)

我知道我可以循环执行此操作,但是在R中有更简洁的方法吗？

我正在尝试解析数据帧列中包含的 JSON，其中一些已损坏。作为第一步，我想识别损坏的行，并使用它来对数据帧进行子集化。

我正在使用这篇文章中的技巧来c()填充列表（尽管我知道它很慢）：

myRows <- c()
for (i in 1:nrow(myDataframe)) {
  tryCatch({myDataframe$myJSONstring[i] %>%
    fromJSON() %>%
    length()},
    error = function(e) {print(i); myRows <- c(myRows, i)})
}

然而，这不起作用。print(i)工作正常，但运行循环后myRows仍然只是一个空列表。tryCatch 的错误位中可以运行的代码是否有一些限制？