diff options
author | Suraj Yerramilli | 2016-02-23 11:01:14 +0530 |
---|---|---|
committer | Suraj Yerramilli | 2016-02-23 11:01:14 +0530 |
commit | 7bfececa208ef0345cc1b526abe75f2ef342578b (patch) | |
tree | 29104e3b2565cac2a2305838699efa69df203023 /R | |
parent | 2d8f188a89e711aeb15b9a36912a6a66fb066c9f (diff) | |
download | SysID-R-code-7bfececa208ef0345cc1b526abe75f2ef342578b.tar.gz SysID-R-code-7bfececa208ef0345cc1b526abe75f2ef342578b.tar.bz2 SysID-R-code-7bfececa208ef0345cc1b526abe75f2ef342578b.zip |
correcting layout
Diffstat (limited to 'R')
-rw-r--r-- | R/idframe.R | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/R/idframe.R b/R/idframe.R index e706d83..77a6582 100644 --- a/R/idframe.R +++ b/R/idframe.R @@ -187,12 +187,13 @@ plot.idfrd <- function(x,col="steelblue",lwd=1){ geom_line(size=lwd,color=col) + scale_x_log10() + facet_grid(variable ~ .,scale="free_y") + theme_bw(14,"sans") + ylab("") + ggtitle(subtitle) + + xlab(ifelse(yindex==nout,"Frequency","")) + theme(axis.title.x=element_text(color = "black",face = "plain"), title=element_text(size=9,color = "gray",face="bold")) + geom_vline(xintercept=max(x$freq),size=1) } - multiplot(plotlist=g,cols=nin) + multiplot(plotlist=g,layout=matrix(1:length(g),nrow=nout,byrow=T)) } # Multiple plot function |