clearify everything

2018-05-15 23:37:31 +02:00
parent 0cf2c1af66
commit 7164638d08
3 changed files with 31 additions and 15 deletions
@@ -295,4 +295,13 @@ getyearlyout<-function(settings){
    ##     }
        
    ## }
-    
+                ## file.copy(file.path(outputLoc,possibleNames)
+            ##          ,file.path(binaryPlace,paste0((stamp(binaryPlace)+1),"-",possibleNames)))
+
+
+            ## epcfiles <- list.files(epcdir)[grep("epc$",list.files(
+            ## stampnum<-stamp(EPCS)
+            ## lapply(epc,function (x) file.copy(from = x ,to=paste(EPCS,"/",(stampnum+1),"-", basename(x),sep="")))
+            ## if(errorsign==1){
+            ##     lapply(epc, function (x) file.copy(from = paste(EPCS,"/",(stampnum+1),"-",basename(x),sep=""), to=WRONGEPC))
+            ## }