diff --git a/articles/Fennica.html b/articles/Fennica.html index be1146d..08703e0 100644 --- a/articles/Fennica.html +++ b/articles/Fennica.html @@ -71,19 +71,19 @@

Fennicalibrary(finna) fennica <- search_finna("*",filters=c('collection:"FEN"')) print(fennica) -
## # A tibble: 100 × 8
-##    Title                   Author Year  Language Formats Subjects Library Series
-##    <chr>                   <chr>  <chr> <chr>    <chr>   <chr>    <chr>   <chr> 
-##  1 Teknologian arviointej… Markk… 2003  fin      Kirja,… teknolo… 3AMK-k… Edusk…
-##  2 Työsuojelusanasto = Ar… Sanas… 2006  fin      Kirja,… Diction… 3AMK-k… TSK   
-##  3 Terveyden edistämisen … Kiisk… 2008  fin      Kirja,… alkohol… 3AMK-k… Sosia…
-##  4 Nuorten terveystapatut… Rimpe… 2007  fin      Kirja,… altistu… 3AMK-k… Sosia…
-##  5 Mahdollisuuksien ikkun… Holma… 2008  fin      Kirja,… Turun a… 3AMK-k… Turun…
-##  6 Mini-intervention jalk… Seppä… 2008  fin      Kirja,… Communi… 3AMK-k… Sosia…
-##  7 Pysytään työssä : vaik… Suomi… 2008  fin      Kirja,… vajaaku… 3AMK-k… Sosia…
-##  8 Tulevaisuus meissä : k… Lampi… 2009  fin      Kirja,… kotital… Diakon… Opetu…
-##  9 Kaupunkiluontoa kaikil… Laine… 2009  fin      Kirja,… kaupunk… 3AMK-k… Tutki…
-## 10 Suomalaisen aikuisväes… Helak… 2011  fin      Kirja,… terveys… Diakon… Rapor…
+
## # A tibble: 100 × 9
+##    id          Title       Author Year  Language Formats Subjects Library Series
+##    <chr>       <chr>       <chr>  <chr> <chr>    <chr>   <chr>    <chr>   <chr> 
+##  1 3amk.39381  Teknologia… Markk… 2003  fin      Kirja,… teknolo… 3AMK-k… Edusk…
+##  2 3amk.55142  Työsuojelu… Sanas… 2006  fin      Kirja,… Diction… 3AMK-k… TSK   
+##  3 3amk.62039  Terveyden … Kiisk… 2008  fin      Kirja,… alkohol… 3AMK-k… Sosia…
+##  4 3amk.62695  Nuorten te… Rimpe… 2007  fin      Kirja,… altistu… 3AMK-k… Sosia…
+##  5 3amk.66893  Mahdollisu… Holma… 2008  fin      Kirja,… Turun a… 3AMK-k… Turun…
+##  6 3amk.68989  Mini-inter… Seppä… 2008  fin      Kirja,… Communi… 3AMK-k… Sosia…
+##  7 3amk.69050  Pysytään t… Suomi… 2008  fin      Kirja,… vajaaku… 3AMK-k… Sosia…
+##  8 diana.90230 Tulevaisuu… Lampi… 2009  fin      Kirja,… kotital… Diakon… Opetu…
+##  9 3amk.70767  Kaupunkilu… Laine… 2009  fin      Kirja,… kaupunk… 3AMK-k… Tutki…
+## 10 diana.96117 Suomalaise… Helak… 2011  fin      Kirja,… terveys… Diakon… Rapor…
 ## # ℹ 90 more rows

 
 

@@ -103,19 +103,19 @@ 
Checking the total countslibrary(finna)
 fennica <- search_finna("*",filters = c('collection:"FEN"', 'search_daterange_mv:"[1809 TO 1918]"'))
 print(fennica)
-
## # A tibble: 100 × 8
-##    Title                   Author Year  Language Formats Subjects Library Series
-##    <chr>                   <chr>  <chr> <chr>    <chr>   <chr>    <chr>   <chr> 
-##  1 "Finland i bilder = Su… Inha,… 1896  mul      Kirja,… NA       Aalto-… NA    
-##  2 "Suomen tärkeimpien ko… Tie- … 1911  fin      Kirja,… NA       Aalto-… NA    
-##  3 "Tietoja Karjalan raut… Schvi… 1893  fin      Kirja,… NA       Jyväsk… Suome…
-##  4 "Förhandlingarna vid F… NA     1892  swe      Kirja,… naisasi… Jyväsk… NA    
-##  5 "Suomen muinaismuisto-… NA     1890  fin      Kirja,… arkeolo… Helka-… Suome…
-##  6 "Bound biblio parent r… Appel… 1891  fin      Kirja,… NA       Jyväsk… NA    
-##  7 "Till \"Fänrik Ståls s… Ekman… 1869  swe      Kirja,… NA       Kansal… NA    
-##  8 "Lauseita Jak. Juteini… Jutei… 1844  fin      Kirja,… NA       Helka-… NA    
-##  9 "Haltia : helmikuun 2 … NA     1881  fin      Kirja,… NA       Helka-… NA    
-## 10 "Kesämatkoja Venäjän K… L. W.… 1898  fin      Kirja,… arkeolo… Helka-… Suome…
+
## # A tibble: 100 × 9
+##    id                Title Author Year  Language Formats Subjects Library Series
+##    <chr>             <chr> <chr>  <chr> <chr>    <chr>   <chr>    <chr>   <chr> 
+##  1 aalto.9973269344… "Fin… Inha,… 1896  mul      Kirja,… NA       Aalto-… NA    
+##  2 aalto.9926263844… "Suo… Tie- … 1911  fin      Kirja,… NA       Aalto-… NA    
+##  3 jykdok.750037     "Tie… Schvi… 1893  fin      Kirja,… NA       Jyväsk… Suome…
+##  4 jykdok.724878     "För… NA     1892  swe      Kirja,… naisasi… Jyväsk… NA    
+##  5 helka.9911841543… "Suo… NA     1890  fin      Kirja,… arkeolo… Helka-… Suome…
+##  6 jykdok.1925462    "Bou… Appel… 1891  fin      Kirja,… NA       Jyväsk… NA    
+##  7 fikka.3996595     "Til… Ekman… 1869  swe      Kirja,… NA       Kansal… NA    
+##  8 helka.9912014063… "Lau… Jutei… 1844  fin      Kirja,… NA       Helka-… NA    
+##  9 helka.9920831553… "Hal… NA     1881  fin      Kirja,… NA       Helka-… NA    
+## 10 helka.9914651535… "Kes… L. W.… 1898  fin      Kirja,… arkeolo… Helka-… Suome…
 ## # ℹ 90 more rows

 
we can check the whole data count

 
@@ -123,7 +123,7 @@ 
Checking the total countsfennica <- search_finna("*",filters = c('collection:"FEN"', 'search_daterange_mv:"[1809 TO 1918]"'))
 result_count <- attr(fennica, "result_count")
 print(result_count)

-
## [1] 56420

+
## NULL

 
 

 
Visualization for fennica
@@ -140,7 +140,138 @@ 
Visualization for fennicarefined_data <- refine_metadata(fennica)
 visualize_word_cloud(refined_data, "Title")
- +

To search for specific fields like author information, publication +details, and call numbers using search_finna, you can use +Finna’s field-specific search filters. Finna allows you +to search in different fields by specifying the type +parameter or adding filters. Here’s how you can modify the +search_finna function to query these fields:

+
+

1. Search for Author Information: +

+ +
+library(finna)
+record <-search_finna(query = "Jean Sibelius", type = "Author")
+record
+
## # A tibble: 100 × 9
+##    id                Title Author Year  Language Formats Subjects Library Series
+##    <chr>             <chr> <chr>  <chr> <chr>    <chr>   <chr>    <chr>   <chr> 
+##  1 kainet.265818     Viol… JEAN … 1983  zxx      Äänite… NA       Kainet… NA    
+##  2 jykdok.1840263    Jean… NA     1984  zxx      Äänite… NA       Jyväsk… NA    
+##  3 fikka.5193247     Jean… NA     1984  zxx      Äänite… NA       Kansal… NA    
+##  4 vaarakirjastot.1… Stri… Jean … 1985  NA       Äänite… kvartet… Vaara-… NA    
+##  5 eepos.101243      Laul… Sibel… 1986  fin      Nuotti  NA       Eepos-… NA    
+##  6 anders.144771     WATE… SIBEL… 1997  NA       Nuotti  1870-LU… Anders… NA    
+##  7 tiekko.370787     Baga… Sibel… 1985  fin      Nuotti  NA       Joki-k… NA    
+##  8 eepos.284329      Musi… Sibel… 2004  fin      Äänite… Kalevala Eepos-… NA    
+##  9 helmet.1510745    Conc… Sibel… 1933  zxx      Nuotti  1900-19… Helmet… NA    
+## 10 eepos.179353      Suit… Sibel… 1997  zxx      Nuotti  NA       Eepos-… NA    
+## # ℹ 90 more rows
+

Alternatively, you can apply filters to search for authors using the +filters parameter:

+
+record <- search_finna(query = "Jean Sibelius", filters = c('author:"Jean Sibelius"'))
+record
+
## # A tibble: 11 × 9
+##    id                Title Author Year  Language Formats Subjects Library Series
+##    <chr>             <chr> <chr>  <chr> <chr>    <chr>   <chr>    <chr>   <chr> 
+##  1 jykdok.1840263    Jean… NA     1984  zxx      Äänite… NA       Jyväsk… NA    
+##  2 fikka.5193247     Jean… NA     1984  zxx      Äänite… NA       Kansal… NA    
+##  3 kainet.265818     Viol… JEAN … 1983  zxx      Äänite… NA       Kainet… NA    
+##  4 tmk.161015782984… koko… Londo… 1977  NA       Esine   musiikk… Turun … NA    
+##  5 vaarakirjastot.1… Stri… Jean … 1985  NA       Äänite… kvartet… Vaara-… NA    
+##  6 tmk.161006468816… ääni… Odeon… 1935  NA       Esine   klassin… Turun … NA    
+##  7 tmk.161006463105… Finl… Elect… 1931  NA       Esine   klassin… Turun … NA    
+##  8 kavi.elonet_elok… Luon… Marik… 2011  NA       Video,… mediata… Kansal… NA    
+##  9 lapinkirjasto.15… Stri… Bergm… 1985  fin      Äänite… kvartet… Lapin … NA    
+## 10 tiekko.902020     Stri… Rauta… 1998  zxx      Kirja,… NA       Joki-k… NA    
+## 11 helmet.2175636    Musi… Turun… 1941  fin      Kirja,… Kuula, … Helmet… NA
+
+
+

2. Search for Publication Information: +

+

If you want to search for publication information such as the +publication date or publisher, you can use type = "Title" +or type = "AllFields" and then apply filters:

+ +
+
+

3. Search by Call Numbers: +

+

Call numbers are used to classify items in libraries. To search by +call number, you can add a filter for callnumber-search or +callnumber:

+
+search_finna(query = "Sibelius", filters = c('callnumber-search:"78.54"'))
+

This will return results where the call number is 78.54 +(which is typically used for orchestral music).

+
+
+

Example Using Multiple Filters: +

+

You can combine these search types and filters to make more complex +queries. For instance, to search for works by Jean +Sibelius published between 2000 and 2020 with +the call number 78.54:

+
+search_finna(
+  query = "Sibelius",
+  filters = c('author:"Jean Sibelius"', 'search_daterange_mv:"[2000 TO 2020]"', 'callnumber-search:"78.54"')
+)
+
+
+

Code Overview: +

+
+# Author search example
+search_finna(query = "Jean Sibelius", type = "Author")
+
+# Search for works by author with publication date range
+search_finna(query = "Jean Sibelius", filters = c('search_daterange_mv:"[2000 TO 2020]"'))
+
+# Search for works by call number
+search_finna(query = "Sibelius", filters = c('callnumber-search:"78.54"'))
+
+# Combine author, publication date, and call number filters
+search_finna(
+  query = "Sibelius",
+  filters = c('author:"Jean Sibelius"', 'search_daterange_mv:"[2000 TO 2020]"', 'callnumber-search:"78.54"')
+)
+
+
+

Notes: +

+ +

This way, you can extract specific metadata like authors, publication +years, and call numbers using the search_finna +function.

+
diff --git a/articles/refinemetadata.html b/articles/refinemetadata.html index cd4e1a3..69fdcad 100644 --- a/articles/refinemetadata.html +++ b/articles/refinemetadata.html @@ -82,15 +82,15 @@

## Title Author Year Language Formats Subjects Library Series ## <chr> <chr> <chr> <chr> <chr> <chr> <chr> <chr> ## 1 Sibelius favourites : … Sibel… 2001 Unknown… Äänite… orkeste… Lapin … Unkno… -## 2 Sibelius Tappe… 1967 Unknown… Taidet… Unknown… Jyväsk… Unkno… -## 3 Sibelius Favén… Unkn… Unknown… Taidet… kaljuus… Lahden… Unkno… -## 4 Sibelius Tawas… 2003 fin Kirja,… Sibeliu… Anders… Unkno… -## 5 Sibelius Ringb… 1948 fin Kirja,… Sibeliu… Eepos-… Unkno… -## 6 SIBELIUS TÖRNE… 1945 fin Kirja,… SIBELIU… Helle-… Unkno… -## 7 Sibelius Lampi… 1995 fin Kirja,… Sibeliu… Kansal… Unkno… -## 8 Sibelius Lampi… 2005 fin Kirja,… Sibeliu… Kansal… Unkno… -## 9 Sibelius Lampi… 1984 fin Kirja,… Sibeliu… Kansal… Unkno… -## 10 Sibelius Tawas… 1997 fin Kirja,… Sibeliu… Kansal… Unkno… +## 2 Sibelius Tawas… 1997 fin Kirja,… Sibeliu… Eepos-… Unkno… +## 3 Sibelius Tawas… 1997 fin Kirja,… Sibeliu… Kansal… Unkno… +## 4 Sibelius Downe… 1945 fin Kirja,… Sibeliu… OUTI-k… Unkno… +## 5 Sibelius Ringb… 1948 fin Kirja,… Sibeliu… Vaasan… Unkno… +## 6 Sibelius Ringb… 1948 swe Kirja,… Sibeliu… Helmet… Unkno… +## 7 Sibelius Tawas… 1968 swe Kirja,… Sibeliu… Anders… Unkno… +## 8 SIBELIUS RINGB… 1948 swe Kirja,… SIBELIU… Helle-… Unkno… +## 9 SIBELIUS TAWAS… 1968 swe Kirja,… SIBELIU… Helle-… Unkno… +## 10 Sibelius Picke… 1960 spa Kirja,… Sibeliu… Jyväsk… Unkno… ## # ℹ 90 more rows
@@ -106,19 +106,19 @@

) integrated_data <- integrate_metadata(finna_data, other_data, key = "Title") print(integrated_data)

-
## # A tibble: 103 × 9
-##    Title            Author Year  Language Formats Subjects Library Series Rating
-##    <chr>            <chr>  <chr> <chr>    <chr>   <chr>    <chr>   <chr>   <dbl>
-##  1 Sibelius favour… Sibel… 2001  NA       Äänite… orkeste… Lapin … NA         NA
-##  2 Sibelius         Tappe… 1967  NA       Taidet… NA       Jyväsk… NA         NA
-##  3 Sibelius         Favén… NA    NA       Taidet… kaljuus… Lahden… NA         NA
-##  4 Sibelius         Tawas… 2003  fin      Kirja,… Sibeliu… Anders… NA         NA
-##  5 Sibelius         Ringb… 1948  fin      Kirja,… Sibeliu… Eepos-… NA         NA
-##  6 SIBELIUS         TÖRNE… 1945  fin      Kirja,… SIBELIU… Helle-… NA         NA
-##  7 Sibelius         Lampi… 1995  fin      Kirja,… Sibeliu… Kansal… NA         NA
-##  8 Sibelius         Lampi… 2005  fin      Kirja,… Sibeliu… Kansal… NA         NA
-##  9 Sibelius         Lampi… 1984  fin      Kirja,… Sibeliu… Kansal… NA         NA
-## 10 Sibelius         Tawas… 1997  fin      Kirja,… Sibeliu… Kansal… NA         NA
+
## # 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 eepos.197… Sibe… Tawas… 1997  fin      Kirja,… Sibeliu… Eepos-… NA         NA
+##  3 arto.0053… Sibe… Tawas… 1997  fin      Kirja,… Sibeliu… Kansal… NA         NA
+##  4 outi.1591… Sibe… Downe… 1945  fin      Kirja,… Sibeliu… OUTI-k… NA         NA
+##  5 vaasa.2dd… Sibe… Ringb… 1948  fin      Kirja,… Sibeliu… Vaasan… NA         NA
+##  6 helmet.14… Sibe… Ringb… 1948  swe      Kirja,… Sibeliu… Helmet… NA         NA
+##  7 anders.13… Sibe… Tawas… 1968  swe      Kirja,… Sibeliu… Anders… NA         NA
+##  8 helle.136… SIBE… RINGB… 1948  swe      Kirja,… SIBELIU… Helle-… NA         NA
+##  9 helle.136… SIBE… TAWAS… 1968  swe      Kirja,… SIBELIU… Helle-… NA         NA
+## 10 jykdok.20… Sibe… Picke… 1960  spa      Kirja,… Sibeliu… Jyväsk… NA         NA
 ## # ℹ 93 more rows

 
 

@@ -135,48 +135,48 @@ 

 ## # A tibble: 10 × 2
 ##    Formats                            n
 ##    <chr>                          <int>
-##  1 Kirja, Kirja                      66
-##  2 Lehti/Artikkeli, Artikkeli        15
-##  3 Äänite, CD                         7
-##  4 Video, DVD                         4
-##  5 Video, Elokuva, lyhyt              2
-##  6 Äänite, Äänilevy                   2
+##  1 Kirja, Kirja                      51
+##  2 Lehti/Artikkeli, Artikkeli        20
+##  3 Äänite, CD                        10
+##  4 Video, DVD                         6
+##  5 Äänite, Äänilevy                   6
+##  6 Video, Elokuva, lyhyt              3
 ##  7 Arkisto/Kokoelma, Arkistosarja     1
 ##  8 Taideteos, Taideteos               1
 ##  9 Taideteos, Veistos                 1
-## 10 Äänite, Musiikkitallenne           1
+## 10 Video, Elokuva, pitkä              1
 ## 
 ## $year_distribution
 ## # A tibble: 38 × 2
-##    Year      n
-##    <chr> <int>
-##  1 1948     10
-##  2 1945      9
-##  3 1997      8
-##  4 1968      6
-##  5 1999      6
-##  6 2003      6
-##  7 1984      4
-##  8 1998      4
-##  9 2015      4
-## 10 1931      3
+##    Year             n
+##    <chr>        <int>
+##  1 1997             8
+##  2 1999             8
+##  3 2003             8
+##  4 1948             7
+##  5 1945             5
+##  6 1968             5
+##  7 1998             5
+##  8 1949             4
+##  9 1996             4
+## 10 Unknown Year     4
 ## # ℹ 28 more rows
 ## 
 ## $author_distribution
-## # A tibble: 56 × 2
+## # A tibble: 50 × 2
 ##    Author                                          n
 ##    <chr>                                       <int>
-##  1 Häyrynen, Antti                                10
-##  2 Layton, Robert                                  7
-##  3 Sibelius, Jean                                  6
-##  4 Ringbom, Nils-Eric                              5
-##  5 Downes, Olin, Sjöblom, Paul, Jalas, Jussi       4
-##  6 Gray, Cecil                                     4
-##  7 Lampila, Hannu-Ilari                            4
-##  8 Tawaststjerna, Erik                             4
-##  9 Tawaststjerna, Erik, Tawaststjerna, Erik T.     4
-## 10 Haapaniemi, Jaakko                              2
-## # ℹ 46 more rows
+## 1 Häyrynen, Antti 13 +## 2 Sibelius, Jean 9 +## 3 Layton, Robert 7 +## 4 Gray, Cecil 4 +## 5 Lampila, Hannu-Ilari 4 +## 6 Ringbom, Nils-Eric 4 +## 7 Haapaniemi, Jaakko 3 +## 8 Schouwman, Hans 3 +## 9 Tawaststjerna, Erik 3 +## 10 Tawaststjerna, Erik, Tawaststjerna, Erik T. 3 +## # ℹ 40 more rows

1. Applying the visualize_year_distribution() @@ -304,7 +304,7 @@

6. Applyin refined_data <- refine_metadata(music_data) visualize_word_cloud(refined_data, "Title")

- +