The bibliomatrix package includes data from the KTH
Annual Bibliometric Monitoring (ABM) public part, including KTH as a
whole, its five schools and about 30 departments. The dataset, named
abm_public_kth, is a list with three entries:
meta, units and
pubtype_order.
Unit info (meta)
library(bibliomatrix)
library(dplyr)
# To show the units included in the ABM, use either abm_public_kth$meta or the unit_info() function.
# (If no database connection is given to unit_info), abm_public_kth$meta is used anyway)
identical(unit_info(), abm_public_kth$meta)
#> [1] TRUE
unit_info()
#> # A tibble: 34 × 20
#> analysis_id Diva_org_id unit_code unit_short unit_long_en
#> <int> <int> <chr> <chr> <chr>
#> 1 17 177 KTH KTH KTH Royal Institute of Technolo…
#> 2 17 5850 A ABE School of Architecture and the …
#> 3 17 5851 5851 NA Architecture
#> 4 17 5857 5857 NA Civil and Architectural Enginee…
#> 5 17 875600 875600 NA Philosophy and History
#> 6 17 5869 5869 NA Real Estate and Construction Ma…
#> 7 17 13604 13604 NA Sustainable development, Enviro…
#> 8 17 5884 5884 NA Urban Planning and Environment
#> 9 17 879223 E EECS School of Electrical Engineerin…
#> 10 17 882650 882650 NA Computer Science
#> # ℹ 24 more rows
#> # ℹ 15 more variables: unit_long_en_indent1 <chr>, unit_long_en_indent2 <chr>,
#> # unit_long_sv <chr>, parent_org_id <int>, org_level <int>, active <int>,
#> # description_en <chr>, kthid <chr>, slug <chr>, altmetric_desc <chr>,
#> # altmetric_count <dbl>, altmetric_href <chr>, altmetric_id <chr>,
#> # altmetric_level <chr>, sort_order <int>
# The unit_code is used in most functions related to ABM
# For schools, unit_code is a single letter, for departments it is equal to the DiVA organization id
unit_info() %>% filter(unit_code == "I")
#> # A tibble: 1 × 20
#> analysis_id Diva_org_id unit_code unit_short unit_long_en unit_long_en_indent1
#> <int> <int> <chr> <chr> <chr> <chr>
#> 1 17 6023 I ITM School of I… " School of Indu…
#> # ℹ 14 more variables: unit_long_en_indent2 <chr>, unit_long_sv <chr>,
#> # parent_org_id <int>, org_level <int>, active <int>, description_en <chr>,
#> # kthid <chr>, slug <chr>, altmetric_desc <chr>, altmetric_count <dbl>,
#> # altmetric_href <chr>, altmetric_id <chr>, altmetric_level <chr>,
#> # sort_order <int>
unit_info() %>% filter(unit_code == "5869")
#> # A tibble: 1 × 20
#> analysis_id Diva_org_id unit_code unit_short unit_long_en unit_long_en_indent1
#> <int> <int> <chr> <chr> <chr> <chr>
#> 1 17 5869 5869 NA Real Estate… " Real Estat…
#> # ℹ 14 more variables: unit_long_en_indent2 <chr>, unit_long_sv <chr>,
#> # parent_org_id <int>, org_level <int>, active <int>, description_en <chr>,
#> # kthid <chr>, slug <chr>, altmetric_desc <chr>, altmetric_count <dbl>,
#> # altmetric_href <chr>, altmetric_id <chr>, altmetric_level <chr>,
#> # sort_order <int>
# The org_level field is 0 for KTH, 1 for schools and 2 for departments. Info for all schools:
unit_info() %>% filter(org_level == 1)
#> # A tibble: 5 × 20
#> analysis_id Diva_org_id unit_code unit_short unit_long_en unit_long_en_indent1
#> <int> <int> <chr> <chr> <chr> <chr>
#> 1 17 5850 A ABE School of A… " School of Arch…
#> 2 17 879223 E EECS School of E… " School of Elec…
#> 3 17 6091 S SCI School of E… " School of Engi…
#> 4 17 879224 C CBH School of E… " School of Engi…
#> 5 17 6023 I ITM School of I… " School of Indu…
#> # ℹ 14 more variables: unit_long_en_indent2 <chr>, unit_long_sv <chr>,
#> # parent_org_id <int>, org_level <int>, active <int>, description_en <chr>,
#> # kthid <chr>, slug <chr>, altmetric_desc <chr>, altmetric_count <dbl>,
#> # altmetric_href <chr>, altmetric_id <chr>, altmetric_level <chr>,
#> # sort_order <int>
# The parent_org_id field can be used to show all departments of some particular school
# (note that the parent id is always a Diva organization id).
unit_info() %>% filter(parent_org_id == 6023) %>% select(unit_code, unit_long_en) %>% arrange(unit_long_en)
#> # A tibble: 6 × 2
#> unit_code unit_long_en
#> <chr> <chr>
#> 1 6024 Energy Technology
#> 2 888007 Engineering Design
#> 3 6030 Industrial Economics and Management (Dept.)
#> 4 879306 Learning
#> 5 6048 Materials Science and Engineering
#> 6 888001 Production engineeringABM tables (units)
library(bibliomatrix)
library(dplyr)
# The five tables presented in the ABM is available in abm_public_kth$units for each unit.
# Get public ABM results for KTH
kth_abm_tables <- abm_public_kth$units$KTH
# Show parts of table 1
knitr::kable(kth_abm_tables[["diva"]] %>% select(Publication_Type_DiVA, P_frac, WoS_coverage))| Publication_Type_DiVA | P_frac | WoS_coverage |
|---|---|---|
| Article, peer review | 14604.55749 | 0.8648226 |
| Article, other | 868.11426 | 0.7931583 |
| Conference paper, peer review | 7063.61959 | 0.5851030 |
| Conference paper, other | 1560.91673 | 0.0464649 |
| Book | 155.47214 | 0.0032160 |
| Anthology (editor) | 55.92619 | 0.0059602 |
| Chapter in book | 1423.19541 | 0.0225510 |
| Article, book review | 111.85000 | 0.5082700 |
| Proceeding (editor) | 35.36587 | 0.0282758 |
| Report | 602.34419 | 0.0000000 |
| Doctoral thesis | 2638.00000 | 0.0000000 |
| Licentiate thesis | 639.00000 | 0.0000000 |
| Patent | 71.04405 | 0.0000000 |
# Note that numeric unit codes need to be enclosed with `
abm_public_kth$units$`5851`$diva
#> # A tibble: 12 × 14
#> Publication_Type_DiVA `2015` `2016` `2017` `2018` `2019` `2020` `2021` `2022`
#> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
#> 1 Article, peer review 11.8 8.5 13.2 5.17 9.09 4.96 4.04 4.46
#> 2 Article, other 2.5 2.5 1.75 0.5 2 NA NA 3.82
#> 3 Conference paper, pe… 7.33 1.25 5.46 2.33 7.90 3.33 1 9.62
#> 4 Conference paper, ot… 14.3 12.6 12.1 13.5 11.2 1 7 5.33
#> 5 Book 0.333 2.33 1.67 1 0.833 0.5 NA 0.75
#> 6 Anthology (editor) NA NA 4.33 NA 1 2.58 NA 1.2
#> 7 Chapter in book 12.5 16.5 23.1 30.5 16.1 15.5 13 8.5
#> 8 Article, book review 2 1 2 NA 1 3 NA 1
#> 9 Proceeding (editor) 1 NA NA NA NA NA 1 NA
#> 10 Report 10.4 2.33 2.52 NA 2 1.17 1 3.5
#> 11 Doctoral thesis NA 3 5 3 NA 4 4 NA
#> 12 Licentiate thesis NA 1 NA NA 2 NA NA NA
#> # ℹ 5 more variables: `2023` <dbl>, `2024` <dbl>, P_frac <dbl>,
#> # WoS_coverage <dbl>, Scopus_coverage <dbl>Order of publication types (pubtype_order)
library(bibliomatrix)
# The only current use for the pubtype_order part of the public data is to present
# the DiVA publication type numbers in a consistent manner
abm_public_kth$pubtype_order
#> # A tibble: 16 × 2
#> pt_ordning diva_publication_type
#> <int> <chr>
#> 1 1 Article, peer review
#> 2 2 Article, other
#> 3 3 Conference paper, peer review
#> 4 4 Conference paper, other
#> 5 5 Book
#> 6 6 Anthology (editor)
#> 7 7 Chapter in book
#> 8 8 Article, book review
#> 9 9 Proceeding (editor)
#> 10 10 Report
#> 11 11 Doctoral thesis
#> 12 12 Licentiate thesis
#> 13 13 Patent
#> 14 14 Popular science etc.
#> 15 15 Other
#> 16 16 Not published material