Creates a bar plot showing the distribution of records by libraries.
Examples
library(finna)
sibelius_data <- search_finna("sibelius")
#> Warning: Default limit of 100 records is being used. Specify 'limit' argument for more records.
#> Total results found: 44513
#> Data fetching completed in 0.57 seconds.
refined_data <- refine_metadata(sibelius_data)
visualize_library_distribution(refined_data)