Config file and change of folder structure

This commit is contained in:
Linsberger Christian 2021-09-06 11:12:20 +02:00
commit bc9e2d06ac
4 changed files with 27 additions and 27 deletions

View file

@ -1,6 +1,9 @@
library("SPARQL")
library("stringi")
### Konfiguration einbinden
source("config/config.R")
### Gets the bibliographicCitations which are currently in the db ##################
read_current_geoera_lit_db <- function() {
@ -32,7 +35,7 @@ for (j in 1:length (inDB[1, ])) {
}
pfad <- paste("data/inDB-", format(Sys.Date(), "%Y_%m_%d"), ".xlsx", sep="")
pfad <- paste(PFAD_DB_OUT, "inDB-", format(Sys.Date(), "%Y_%m_%d"), ".xlsx", sep="")
write_xlsx(inDB, pfad)
@ -41,7 +44,7 @@ write_xlsx(inDB, pfad)
get_current_geoera_lit_db <- function() {
pfad <- paste("data/inDB-", format(Sys.Date(), "%Y_%m_%d"), ".xlsx", sep="")
pfad <- paste(PFAD_DB_OUT, "inDB-", format(Sys.Date(), "%Y_%m_%d"), ".xlsx", sep="")
if (file.exists(pfad)) {
inDB <- read_excel(pfad)