fix the ggsave bug
This commit is contained in:
parent
4128e75142
commit
d52f358802
@ -126,10 +126,10 @@ plotMusoWithData <- function(csvFile, variable, NACHAR=NA, settings=NULL, sep=",
|
||||
labs(y = paste0(variable,"_measured"))+
|
||||
theme(axis.title.x = element_blank())
|
||||
if(!is.null(savePlot)){
|
||||
return(p)
|
||||
} else {
|
||||
ggsave(savePlot,p)
|
||||
return(p)
|
||||
} else {
|
||||
return(p)
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
Loading…
Reference in New Issue
Block a user