R/list_envs.R

In RajLabMSSM/echoconda: echoverse module: conda environment management

#' List conda envs
#' 
#' List all available conda environments.
#' @param conda_env [Optional] A specific conda environment to search for.
#' @inheritParams find_conda
#' @inheritParams reticulate::conda_list
#' @export
#' @importFrom data.table :=
list_envs <- function(conda="auto",
                      conda_env=NULL,
                      method=c("basilisk","reticulate")){
    python <- name <- dir <- NULL;
     
    conda_x <- find_conda(conda = conda,
                          method = method)
    envs <- reticulate::conda_list(conda = conda_x)
    # envs <- list.files(file.path(basilisk.utils::getCondaDir(),"envs"), 
    #                    full.names = TRUE)
    envs <- data.table::data.table(envs)
    envs[,dir:=dirname(dirname(python)),]
    #### Search for matching env ####
    if(!is.null(conda_env)){
        envs <- envs[name %in% conda_env,]
    } 
    if(nrow(envs)==0) {
        messager("Warning: Could not identify any conda_env",
                 "matching existing conda environments.") 
    } 
    return(envs)
}