在R中，如何在列表中递归地将NULL替换为NA？

Question

我尝试使用rapply：

list1 = list(1,list(2,NULL),4, list("foo",list(6, NULL)))
list2 = rapply(list1, function() NA_character_, classes = "NULL", 
how="replace")

但没有成功。