我有一个包含15个级别的巨大嵌套列表.我需要用chr""替换任何级别的空列表.我尝试了lapply循环遍历列表,但它不起作用.有没有简单的方法来做到这一点？
nested_list<-list(a=list(x=list(),y=list(i=list(),j=list(p=list(),q=list()))),b=list())
lapply(nested_list,function(x) if(length(x)==0) "" else x)
lapply仅应用于第一级,如何递归循环整个嵌套列表并执行此操作？