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