Config file and change of folder structure
This commit is contained in:
parent
667dc7d68d
commit
bc9e2d06ac
4 changed files with 27 additions and 27 deletions
7
sparql.R
7
sparql.R
|
|
@ -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)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue