Commit 74c920ee authored by Habil, Ardalan (arhab001)'s avatar Habil, Ardalan (arhab001)
Browse files

deformatGene bug

parent 0af04a92
...@@ -321,12 +321,11 @@ deformatSBMLid <- function(idstr) { ...@@ -321,12 +321,11 @@ deformatSBMLid <- function(idstr) {
} }
deformatGene<-function(idstr) { deformatGene<-function(idstr) {
# idstr <- gsub("and", "&&", idstr, fixed = TRUE) idstr<-gsub("\\((\\S+)\\)", "\\1", idstr)
# idstr <- gsub("or", "||", idstr, fixed = TRUE) #idstr <- gsub("( ", "(", idstr, fixed = TRUE)
idstr <- gsub("( ", "(", idstr, fixed = TRUE) #idstr <- gsub(" (", "(", idstr, fixed = TRUE)
idstr <- gsub(" (", "(", idstr, fixed = TRUE) #idstr <- gsub(") ", ")", idstr, fixed = TRUE)
idstr <- gsub(") ", ")", idstr, fixed = TRUE) #idstr <- gsub(" )", ")", idstr, fixed = TRUE)
idstr <- gsub(" )", ")", idstr, fixed = TRUE)
idstr <- gsub(":", "_", idstr, fixed = TRUE) idstr <- gsub(":", "_", idstr, fixed = TRUE)
return(idstr) return(idstr)
} }
...@@ -568,11 +567,3 @@ exportSBML<- function(morg=NULL,level=2,version=4,FbcLevel=0,filename="export.xm ...@@ -568,11 +567,3 @@ exportSBML<- function(morg=NULL,level=2,version=4,FbcLevel=0,filename="export.xm
) )
return (success) return (success)
} }
\ No newline at end of file
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment