瀏覽代碼

Muudetud 'construct_qgis_output_result_to_beter_format'.

Ardo Kubjas 5 年之前
父節點
當前提交
40ff3ee91c
共有 1 個文件被更改,包括 2 次插入0 次删除
  1. 2 0
      R/construct_qgis_output_result_to_beter_format.R

+ 2 - 0
R/construct_qgis_output_result_to_beter_format.R

@@ -44,6 +44,8 @@ construct_qgis_output_result_to_beter_format <- function(str = "") {
   str <- gsub("@@", "\\'", str, fixed = T)
   str <- gsub(", ", ",\n", str)
   str <- gsub(":", "=", str)
+  str <- gsub("[[]", "c(", str)
+  str <- gsub("[]]", ")", str)
 
   # list
   str_list <- gsub("'", "\"", str_list)