R/to_hv_list.R

In hypervolume: High Dimensional Geometry, Set Operations, Projection, and Inference Using Kernel Density Estimation, Support Vector Machines, and Convex Hulls

to_hv_list <- function(path) {
  # Returns hypervolume list object
  hvs = new("HypervolumeList")
  
  # adds every hypervolume object in the directory to list
  hvs@HVList = foreach(file = list.files(path), .combine = c) %do% {
    readRDS(file.path(path, file))
  }
  return(hvs)
}