zdb added

data/zdb-online.json

+["2794221-1", "2821884-X", "2794220-X", "2556002-5", "2794854-7", "2793164-X", "2752219-2", "2794253-3", "2959465-0", "2401984-7", "2406214-5", "2796271-4", "2660796-7", "2796417-6", "2402361-9", "2440774-4", "2794726-9", "2792789-1", "2789030-2", "2021339-6", "2810358-0", "2771308-8", "2433287-2", "2794340-9", "2748575-4", "2959693-2", "2748612-6", "2794893-6"]

utils/create

 #!/usr/bin/env Rscript
 GVK_URL <- "https://gitlab.informatik.uni-halle.de/dikon/vkg-pica/-/raw/master/view/output/gvk--any--online.csv"
 VD18_URL <- "https://gitlab.informatik.uni-halle.de/dikon/vkg-pica/-/raw/master/view/output/vd18--any--online.csv"
+ZDB_URL <- "https://gitlab.informatik.uni-halle.de/dikon/vkg-pica/-/raw/master/view/output/zdb--any--online.csv"
 gvk <- read.csv(url(GVK_URL))
 jsonlite::write_json(gvk$ppn, "data/gvk-online.json", pretty=T)
 vd18 <- read.csv(url(VD18_URL))
@@ -8,3 +9,5 @@ vd18_nr <- unique(vd18$vd18_nr)
 # vd18_nr <- unique(c(vd18$vd18_nr, gvk$vd18_nr))
 vd18_nr <- vd18_nr[grepl("^[[:alnum:]]{8}$", vd18_nr, perl=T)]    # exclude temporary identifiers
 jsonlite::write_json(vd18_nr, "data/vd18-online.json", pretty=T)
+zdb <- read.csv(url(ZDB_URL))
+jsonlite::write_json(zdb$zdb_nr, "data/zdb-online.json", pretty=T)