Open Bisaloo opened 2 years ago
extract_min_r_version <- function(path) {
read.dcf("DESCRIPTION", "Depends") |>
strsplit(",") |>
unlist() |>
trimws() |>
(\(x) grep("R ", x, value = TRUE))() |>
(\(x) gsub("^R \\(>=?\\s(.+)\\)", "\\1", x))() |>
unname()
}
get_pkg_logo()
: Download a package logo from theepiverse-trace/logos
DESCRIPTION
to use in combination withlintr::backport_linter()