[BUGFIX][Processing][Rscript] Write output Table

Add support forwriting output table to Rscript command.
qgis · May 25, 2016 · f56c568fabe0db23949ca1b06e0818ddd151505c · f56c568
1 parent 2f49f6a
commit f56c568fabe0db23949ca1b06e0818ddd151505c
Unified Split

Showing with 5 additions and 1 deletion.

+5 −1 python/plugins/processing/algs/r/RAlgorithm.py
diff --git a/python/plugins/processing/algs/r/RAlgorithm.py b/python/plugins/processing/algs/r/RAlgorithm.py
@@ -278,7 +278,7 @@ def getExportCommands(self):
                         value = value + '.tif'
                     commands.append('writeGDAL(' + out.name + ',"' + value
                                     + '")')
-            if isinstance(out, OutputVector):
+            elif isinstance(out, OutputVector):
                 value = out.value
                 if not value.endswith('shp'):
                     value = value + '.shp'
@@ -287,6 +287,10 @@ def getExportCommands(self):
                 filename = filename[:-4]
                 commands.append('writeOGR(' + out.name + ',"' + value + '","'
                                 + filename + '", driver="ESRI Shapefile")')
+            elif isinstance(out, OutputTable):
+                value = out.value
+                value = value.replace('\\', '/')
+                commands.append('write.csv(' + out.name + ',"' + value + '"')
 
         if self.showPlots:
             commands.append('dev.off()')