R/null_recursive.R

Defines functions null_recursive

null_recursive <- function(ls, name) {


  ls %>% map(~(
    if(typeof(.) == "list") {

      .[[name]] <- NULL
      map(., ~(null_recursive(., name)))

    } else {

      .

    }
  ))
}
blueprint-ade/bputils documentation built on May 29, 2019, 5:57 p.m.