22 lines
905 B
R
22 lines
905 B
R
### Lists packages without any successful binaries, i.e. pkgs for which all builds errored (per platform & arch)
|
|
library(DBI)
|
|
library(dplyr)
|
|
con <- DBI::dbConnect(RPostgres::Postgres(),
|
|
dbname = "build_metadata", host = "r-binaries.devxy.io",
|
|
port = 15432, user = "r_binaries", password = Sys.getenv("PGPASS"),
|
|
sslmode = "require"
|
|
)
|
|
|
|
data <- dbGetQuery(con, "SELECT name,platform,arch FROM single_builds group by name,platform,arch HAVING COUNT(*) = SUM(CASE WHEN error_occurred = 'TRUE' AND removed = 'FALSE' THEN 1 ELSE 0 END);")
|
|
|
|
pkgs <- data |>
|
|
filter(platform == "ubuntu-2204", arch == "arm64") |>
|
|
pull(name)
|
|
|
|
# Format, remove line breaks, and print as a single line
|
|
formatted_pkgs <- gsub('"', "'", capture.output(dput(pkgs[1:300])))
|
|
formatted_pkgs_one_line <- paste(formatted_pkgs, collapse = " ")
|
|
|
|
cat(formatted_pkgs_one_line, "\n", sep = "")
|
|
|
|
clipr::write_clip(formatted_pkgs_one_line)
|