# Read data
source("Scripts/Read_Maindata.R")
Years <- Specific_Data$Years %>% rev()

# Choose libraries
Bibliothek_0 <- "U4156"

source("Scripts/Gather_Library_Data.R")
