Optimize parameters

.gitignore

@@ -42,4 +42,9 @@ vignettes/*.pdf
 docs/
 
 # translation temp files
-po/*~
+po/*~
+
+# Folders
+DPT/
+OPUS/
+OPUS_save/

OpusData.R

@@ -4,8 +4,8 @@
 source("ReadOpus.R")
 
 # Determine file path
-path <- paste0(getwd(), "/OPUS/")
-file_name <- commandArgs(trailingOnly = TRUE)[1]
+path <- commandArgs(trailingOnly = TRUE)[1]
+file_name <- commandArgs(trailingOnly = TRUE)[2]
 file_path <- paste(path, file_name, sep = "")
 
 # Convert opus binary file into dataframe

dirMonitor.sh

@@ -1,5 +1,5 @@
 #!/bin/bash
 inotifywait -m OPUS -e create -e moved_to |
 	while read fpath action file; do
-		Rscript OpusData.R $file
+		Rscript OpusData.R $fpath $file
 	done

transferData.py

@@ -23,12 +23,3 @@ headers = {
 }
 
 data = '{"topic":"definma_connect/Rng/things/twin/commands/modify", "path":"features/data","value":{"properties":' + jsonString + '}}'
-
-print(data)
-
-# Convert jsonString to dictionary
-#jsonDict = json.loads(jsonString)
-
-# Write Json into file
-#with open(file_name, 'w') as jsonFile:
-#    json.dump(jsonDict, jsonFile)