R/ll.crunch.R

Defines functions ll.crunch

ll.crunch <-
function(list.of.list.of.nets, function.name){
  ll <- list.of.list.of.nets
  lapply(ll, function(x) {
    if(is.list(x) && !is.network(x))
      lapply(x, function.name)
  })
}

Try the epinetics package in your browser

Any scripts or data that you put into this service are public.

epinetics documentation built on May 2, 2019, 6:25 p.m.