diff options
| author | Suraj Yerramilli | 2016-02-24 11:37:55 +0530 |
|---|---|---|
| committer | Suraj Yerramilli | 2016-02-24 11:37:55 +0530 |
| commit | d75f12453738d230b27422fa135425d5a99159d0 (patch) | |
| tree | 23044617ac935fac8c3ddc54a4524d9e04281732 | |
| parent | 2a6363027ec671af60dd25127c938affb7c2285e (diff) | |
| download | SysID-R-code-d75f12453738d230b27422fa135425d5a99159d0.tar.gz SysID-R-code-d75f12453738d230b27422fa135425d5a99159d0.tar.bz2 SysID-R-code-d75f12453738d230b27422fa135425d5a99159d0.zip | |
switching to the default font in plots
| -rw-r--r-- | R/idframe.R | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/R/idframe.R b/R/idframe.R index ff2e62b..69ab0d1 100644 --- a/R/idframe.R +++ b/R/idframe.R @@ -71,7 +71,7 @@ plot.idframe <- function(x,col="steelblue",lwd=1,main=NULL){ } ggplot(melt(data.frame(time=as.numeric(time(data)), data), id.vars="time"), aes(time, value)) + geom_line(size=lwd,color=col) + - facet_grid(variable ~ .,scale="free") + theme_bw(14,"sans") + ylab("") + + facet_grid(variable ~ .,scale="free") + theme_bw(14) + ylab("") + theme(axis.title.x=element_text(size=11)) + ggtitle(main) } @@ -192,7 +192,7 @@ plot.idfrd <- function(x,col="steelblue",lwd=1){ g[[i]] <- ggplot(melt_df, aes(Frequency, value)) + geom_line(size=lwd,color=col) + scale_x_log10() + facet_grid(variable ~ .,scale="free_y") + - theme_bw(14,"sans") + ylab("") + ggtitle(subtitle) + + theme_bw(14) + 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")) + |