fix problem with () in gsub

stivalaa · Oct 28, 2022 · 31dd745 · 31dd745
1 parent 2ab6430
commit 31dd745
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/convertConnect4BoardDirectorAffiliationsToALAAMEEFormatCentrality.R b/R/convertConnect4BoardDirectorAffiliationsToALAAMEEFormatCentrality.R
@@ -384,10 +384,10 @@ for (colname in names(dat)) {
                                            function(s) gsub(",", ".", s)))
   g <- set.vertex.attribute(g, colname,
                             value = sapply(get.vertex.attribute(g, colname),
-                                           function(s) gsub("(", ".", s)))
+                                           function(s) gsub("(", ".", s, fixed = TRUE)))
   g <- set.vertex.attribute(g, colname,
                             value = sapply(get.vertex.attribute(g, colname),
-                                           function(s) gsub(")", ".", s)))
+                                           function(s) gsub(")", ".", s, fixed = TRUE)))
 }