Skip to content
Snippets Groups Projects
Commit a45a5499 authored by dj44vuri's avatar dj44vuri
Browse files

added perl=TRUE to subcoef

parent 1eee6a79
No related branches found
No related tags found
No related merge requests found
......@@ -29,9 +29,9 @@ subcoef <- function(condition, mname){
methods::slot(mname,ele) <- elements
}
methods::slot(mname,"coef.names")<-gsub(pattern = condition,replacement = "",x =methods::slot(mname,"coef.names") )
methods::slot(mname,"coef.names")<-gsub(pattern = condition,replacement = "",x =methods::slot(mname,"coef.names") ,perl = TRUE )
methods::slot(mname,"model.name")<-gsub("_","",condition)
methods::slot(mname,"model.name")<-gsub("_","",condition, perl = TRUE)
return(mname)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment