Clean up convert.R [no ci]

gesistsa · Sep 7, 2023 · 21a9676 · 21a9676
1 parent 45f37bd
commit 21a9676
Showing 1 changed file with 4 additions and 14 deletions.
diff --git a/data-raw/convert.R b/data-raw/convert.R
@@ -1,16 +1,6 @@
-
-writeLines(jsonlite::read_json("data-raw/single.json", TRUE))
+writeLines(
+    jsonlite::prettify(jsonlite::toJSON(jsonlite::read_json(here::here("data-raw/single.json"), TRUE))),
+    here::here("data-raw/single.json")
+)
 rio_formats <- rio::import(here::here("data-raw", "single.json"))
-
 usethis::use_data(rio_formats, overwrite = TRUE, internal = TRUE)
-
-require(data.table)
-rf <- data.table(rio_formats)[type %in% c("import", "suggest", "archive"), !"ext"]
-short_rf <- rf[, paste(input, collapse = " / "), by = format_name]
-type_rf <- unique(rf[,c("format_name", "type", "import_function", "export_function", "note")])
-
-feature_table <- short_rf[type_rf, on = .(format_name)]
-
-colnames(feature_table)[2] <- "signature"
-
-setorder(feature_table, "type", "format_name")