R/bioc.R

In updateme: Informative Messages About Outdated Packages

bioc_version <- function(pkg = NULL) {
  if (is_installed("BiocManager")) {
    vn <- try(BiocManager::version(), silent = TRUE)
    if (inherits(vn, "numeric_version"))
      return(vn[, 1:2])
  }

  vn <- installed_version("BiocVersion")
  if (inherits(vn, "numeric_version"))
    return(vn[, 1:2])

  NULL
}

bioc_repo <- function(version) {
  paste0("https://bioconductor.org/packages/", version, "/bioc")
}