Last updated on 2024-12-21 02:49:25 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 1.4.0 | 2.62 | 30.63 | 33.25 | OK | |
| r-devel-linux-x86_64-debian-gcc | 1.4.0 | 2.42 | 24.26 | 26.68 | OK | |
| r-devel-linux-x86_64-fedora-clang | 1.4.0 | 54.17 | OK | |||
| r-devel-linux-x86_64-fedora-gcc | 1.4.0 | 54.79 | OK | |||
| r-devel-windows-x86_64 | 1.4.0 | 4.00 | 65.00 | 69.00 | OK | |
| r-patched-linux-x86_64 | 1.4.0 | 2.75 | 28.48 | 31.23 | ERROR | |
| r-release-linux-x86_64 | 1.4.0 | 2.35 | 29.50 | 31.85 | OK | |
| r-release-macos-arm64 | 1.4.0 | 35.00 | OK | |||
| r-release-macos-x86_64 | 1.4.0 | 44.00 | OK | |||
| r-release-windows-x86_64 | 1.4.0 | 4.00 | 63.00 | 67.00 | OK | |
| r-oldrel-macos-arm64 | 1.4.0 | 31.00 | OK | |||
| r-oldrel-macos-x86_64 | 1.4.0 | 50.00 | OK | |||
| r-oldrel-windows-x86_64 | 1.4.0 | 5.00 | 70.00 | 75.00 | OK |
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