Introduction

Finto is a Finnish thesaurus and ontology service that provides a centralized platform for managing and utilizing controlled vocabularies in various applications, including libraries, archives, and research institutions. It enables seamless integration with linked data. Maintained by the National Library of Finland, Finto enhances interoperability and accessibility of structured metadata across different domains.

To make a simple search Search Concepts by Query Term we use the following.

library(finto)
concepts <- search_concepts("sibelius")
head(concepts)

To get available vocabularies from the Finto Skosmos API we use

library(finto)
vocabularies <- get_vocabularies(lang = "en")
head(vocabularies)

To retrieve top concepts in a vocabulary

library(finto)
top_concepts <- get_top_concepts(vocid = "yso", lang = "fi")
head(top_concepts)

library(finto)
author_info <- fetch_kanto_info(asteriID = "000094320")
knitr::kable(author_info,caption = "author info")

library(finto)
profession_info <- fetch_profession_info("http://urn.fi/URN:NBN:fi:au:mts:m3357")
knitr::kable(profession_info,caption = "author info")

library(finto)
library(tidyverse)
input_data <- tibble(author_ID = c("000069536", "000041234", "000057891"))
full_author_info <- finto::get_kanto(input_data)
knitr::kable(full_author_info, caption = "Full author Data Frame from kanto")