Integrate Finna Metadata with Another Dataset — integrate

Merges Finna metadata with another dataset using a common key (e.g., "Title").

Usage

integrate_metadata(metadata1, metadata2, key = "Title")

Arguments

metadata1: A tibble containing refined Finna metadata.
metadata2: A tibble containing another dataset to merge with the Finna metadata.
key: A string specifying the key to join by. Defaults to "Title".

Value

A tibble containing the merged dataset.

Examples

library(dplyr)
#> 
#> Attaching package: ‘dplyr’
#> The following objects are masked from ‘package:stats’:
#> 
#>     filter, lag
#> The following objects are masked from ‘package:base’:
#> 
#>     intersect, setdiff, setequal, union
finna_data <- search_finna("sibelius")

# Example other dataset to merge with
other_data <- tibble::tibble(
  Title = c("Sibelius Symphony No. 5", "Finlandia", "Valse Triste"),
  Rating = c(5, 4, 3)
)

# Integrate the two datasets by "Title"
integrated_data <- integrate_metadata(finna_data, other_data, key = "Title")
print(integrated_data)
#> # A tibble: 103 × 10
#>    id         Title Author Year  Language Formats Subjects Library Series Rating
#>    <chr>      <chr> <chr>  <chr> <chr>    <chr>   <chr>    <chr>   <chr>   <dbl>
#>  1 lapinkirj… Sibe… Sibel… 2001  NA       Äänite… orkeste… Lapin … NA         NA
#>  2 jtm.15877… Sibe… Tappe… 1967  NA       Taidet… NA       Jyväsk… NA         NA
#>  3 lahdenmus… Sibe… Favén… NA    NA       Taidet… kaljuus… Lahden… NA         NA
#>  4 anders.19… Sibe… Tawas… 2003  fin      Kirja,… Sibeliu… Anders… NA         NA
#>  5 eepos.136… Sibe… Ringb… 1948  fin      Kirja,… Sibeliu… Eepos-… NA         NA
#>  6 helle.110… SIBE… TÖRNE… 1945  fin      Kirja,… SIBELIU… Helle-… NA         NA
#>  7 arto.0008… Sibe… Lampi… 1995  fin      Kirja,… Sibeliu… Kansal… NA         NA
#>  8 arto.0009… Sibe… Lampi… 2005  fin      Kirja,… Sibeliu… Kansal… NA         NA
#>  9 arto.0052… Sibe… Lampi… 1984  fin      Kirja,… Sibeliu… Kansal… NA         NA
#> 10 arto.0053… Sibe… Tawas… 1997  fin      Kirja,… Sibeliu… Kansal… NA         NA
#> # ℹ 93 more rows