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) {
}
deformatGene<-function(idstr) {
# idstr <- gsub("and", "&&", idstr, fixed = TRUE)
# 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("\\((\\S+)\\)", "\\1", idstr)
#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)
}
......@@ -568,11 +567,3 @@ exportSBML<- function(morg=NULL,level=2,version=4,FbcLevel=0,filename="export.xm
)
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