inst/envs/format_scvelo_deps.R

library(dplyr)
library(tidyr)

pkg_info <- read.table("Windows_20240524.txt", skip = 2)
pkg_specs <- pkg_info %>%
    as_tibble() %>%
    unite("spec", V1, V2, sep = "==") %>%
    pull(spec)

cat(paste0(
    "c(",
    "\n",
    paste0("  ", "'", pkg_specs, "'", collapse = ",\n"),
    "\n",
    ")",
    "\n"
))

# paste the result in R/basilisk.R
kevinrue/velociraptor documentation built on Sept. 17, 2024, 3:22 p.m.