Merge branch 'main' of https://git.ratg.cat/marcelcosta/BDAccess

Corrección entrada samples
2021-10-25 16:42:30 +02:00 · 2021-10-25 16:41:53 +02:00
1 changed files with 1 additions and 1 deletions
@@ -74,7 +74,7 @@ saveWorkbook(wb,"queryOV.xlsx",overwrite = TRUE)

 ## Añadir código de muestra nueva a la base de datos
 nsamples<-sqlFetch(dta, "SAMPLES") %>% nrow
-upd.samples<-read.xlsx("QuerySamplesOV.xlsx")
+upd.samples<-read.xlsx("QueryOV.xlsx", sheet = "samples", detectDates = T)
 rownames(upd.samples)<-(nsamples+1):(nsamples+nrow(upd.samples)) %>% as.character

 ### !! Atención, esto cambia la base de datos:
Author	SHA1	Message	Date
Marin Jimenez	722399997a	Merge branch 'main' of https://git.ratg.cat/marcelcosta/BDAccess	2021-10-25 16:42:30 +02:00
Marin Jimenez	de5459e8d2	Corrección entrada samples	2021-10-25 16:41:53 +02:00