R/zzz.R

In RcppPlanc: Parallel Low-Rank Approximation with Nonnegativity Constraints

Defines functions .onUnload .onLoad

.onLoad <- function(libname, pkgname) {
  .openblaspthreadoff(getLoadedDLLs()[["RcppPlanc"]][[4]])
  return(invisible(NULL))
}

.onUnload <- function(libpath) {
  .openblaspthreadon(getLoadedDLLs()[["RcppPlanc"]][[4]])
  library.dynam.unload("RcppPlanc", libpath)
  return(invisible(NULL))
}

Try the RcppPlanc package in your browser