Last updated on 2024-12-18 19:49:33 CET.
| Package | ERROR | OK |
|---|---|---|
| bibliometrix | 13 | |
| openalexR | 1 | 12 |
Current CRAN status: OK: 13
Current CRAN status: ERROR: 1, OK: 12
Version: 1.4.0
Check: examples
Result: ERROR
Running examples in ‘openalexR-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: oa_generate
> ### Title: Iterating through records
> ### Aliases: oa_generate
>
> ### ** Examples
>
> if (require("coro")) {
+ # Example 1: basic usage getting one record at a time
+ query_url <- "https://api.openalex.org/works?filter=cites%3AW1160808132"
+ oar <- oa_generate(query_url, verbose = TRUE)
+ p1 <- oar() # record 1
+ p2 <- oar() # record 2
+ p3 <- oar() # record 3
+ head(p1)
+ head(p3)
+
+ # Example 2: using `coro::loop()` to iterate through the generator
+ query_url <- "https://api.openalex.org/works?filter=cited_by%3AW1847168837"
+ oar <- oa_generate(query_url)
+ coro::loop(for (x in oar) {
+ print(x$id)
+ })
+
+ # Example 3: save records in blocks of 100
+ query_url <- "https://api.openalex.org/works?filter=cites%3AW1160808132"
+ oar <- oa_generate(query_url)
+ n <- 100
+ recs <- vector("list", n)
+ i <- 0
+
+ coro::loop(for (x in oar) {
+ j <- i %% n + 1
+ recs[[j]] <- x
+ if (j == n) {
+ # saveRDS(recs, sprintf("rec-%s.rds", i %/% n))
+ recs <- vector("list", n) # reset recs
+ }
+ i <- i + 1
+ })
+ head(x)
+ j
+ # 398 works total, so j = 98 makes sense.
+
+ # You can also manually call the generator until exhausted
+ # using `while (!coro::is_exhausted(record_i))`.
+ # More details at https://coro.r-lib.org/articles/generator.html.
+
+ }
Loading required package: coro
Getting record 1 of 489 records...
Getting record 2 of 489 records...
Getting record 3 of 489 records...
[1] "https://openalex.org/W4248184440"
[1] "https://openalex.org/W1521059904"
[1] "https://openalex.org/W2063977404"
[1] "https://openalex.org/W1987736762"
[1] "https://openalex.org/W2127626512"
[1] "https://openalex.org/W2135732400"
Error in res[[result_name]][[j]] : subscript out of bounds
Calls: <Anonymous> ... <Anonymous> -> user -> <<- -> env_poke -> eval_bare
Execution halted
Flavor: r-patched-linux-x86_64