ropensci / openalexR

Getting bibliographic records from OpenAlex
https://docs.ropensci.org/openalexR/
Other
89 stars 19 forks source link

New authors2df column for other/previous affiliations #199

Closed yjunechoe closed 5 months ago

yjunechoe commented 5 months ago

Resolves #196

oa_fetch() for authors now also includes affiliations_other, a list-column of institution IDs for the author's other affiliations.

author <- oa_fetch("author", "https://openalex.org/A5019422724")
author[, c("affiliations_other")]
#> # A tibble: 1 × 1
#>   affiliations_other
#>   <list>            
#> 1 <chr [4]>
author$affiliations_other
#> [[1]]
#> [1] "https://openalex.org/I138006243"  "https://openalex.org/I4210124125"
#> [3] "https://openalex.org/I4210166612" "https://openalex.org/I179638627"

More information about the other affiliations can simply be retrieved through a separate query

oa_fetch("institution", author$affiliations_other[[1]]) |>
  dplyr::glimpse()
#> Rows: 4
#> Columns: 21
#> $ id                         <chr> "https://openalex.org/I138006243", "https://o…
#> $ display_name               <chr> "University of Arizona", "Cancer Treatment Ce…
#> $ display_name_alternatives  <list> "Universidad de Arizona", NA, NA, "AIDS/HIV …
#> $ display_name_acronyms      <list> "UA", "CTCA", NA, NA
#> $ display_name_international <list> <"جامعة أريزونا", "جامعة اريزونا", "Universi…
#> $ ror                        <chr> "https://ror.org/03m2x1q45", "https://ror.or…
#> $ ids                        <list> <"https://openalex.org/I138006243", "https://…
#> $ country_code               <chr> "US", "US", "US", "US"
#> $ geo                        <list> [<data.frame[1 x 7]>], [<data.frame[1 x 7]>]…
#> $ type                       <chr> "education", "healthcare", "healthcare", "non…
#> $ homepage_url               <chr> "http://www.arizona.edu/", "http://www.cance…
#> $ image_url                  <chr> "https://commons.wikimedia.org/w/index.php?ti…
#> $ image_thumbnail_url        <chr> "https://commons.wikimedia.org/w/index.php?ti…
#> $ associated_institutions    <list> [<data.frame[5 x 6]>], [<data.frame[3 x 6]>],…
#> $ works_count                <int> 201491, 1052, 386, 240
#> $ cited_by_count             <int> 6553153, 32367, 7442, 3473
#> $ counts_by_year             <list> [<data.frame[13 x 3]>], [<data.frame[13 x 3]>…
#> $ works_api_url              <chr> "https://api.openalex.org/works?filter=insti…
#> $ x_concepts                 <list> [<data.frame[15 x 5]>], [<data.frame[16 x 5]>…
#> $ updated_date               <chr> "2024-01-28T15:28:30.601965", "2024-01-28T17:…
#> $ created_date               <chr> "2016-06-24", "2016-06-24", "2022-02-02", "2…