I would like to generate a figure that has a combination of base and ggplot graphics. The following code shows my figure using the base plotting functions of R:

    t &lt;- c(1:(24*14)) 
    P &lt;- 24 
    A &lt;- 10 
    y &lt;- A*sin(2*pi*t/P)+20
    
    par(mfrow=c(2,2))
    plot(y,type = &quot;l&quot;,xlab = &quot;Time (hours)&quot;,ylab = &quot;Amplitude&quot;,main = &quot;Time series&quot;)
    acf(y,main = &quot;Autocorrelation&quot;,xlab = &quot;Lag (hours)&quot;, ylab = &quot;ACF&quot;)
    spectrum(y,method = &quot;ar&quot;,main = &quot;Spectral density function&quot;, 
             xlab = &quot;Frequency (cycles per hour)&quot;,ylab = &quot;Spectrum&quot;)
    require(biwavelet)
    t1 &lt;- cbind(t, y)
    wt.t1=wt(t1)
    plot(wt.t1, plot.cb=FALSE, plot.phase=FALSE,main = &quot;Continuous wavelet transform&quot;,
         ylab = &quot;Period (hours)&quot;,xlab = &quot;Time (hours)&quot;)

Which generates
![enter image description here][1]


Most of these panels look sufficient for me to include in my report. However, the plot showing the autocorrelation needs to be improved. This looks much better by using ggplot:

    require(ggplot2)
    acz &lt;- acf(y, plot=F)
    acd &lt;- data.frame(lag=acz$lag, acf=acz$acf)
    ggplot(acd, aes(lag, acf)) + geom_area(fill=&quot;grey&quot;) +
      geom_hline(yintercept=c(0.05, -0.05), linetype=&quot;dashed&quot;) +
      theme_bw()

![enter image description here][2]

However, seeing as ggplot is not a base graphic, we cannot combine ggplot with layout or par(mfrow). How could I replace the autocorrelation plot generated from the base graphics with the one generated by ggplot? I know I can use grid.arrange if all of my figures were made with ggplot but how do I do this if only one of the plots are generated in ggplot?


  [1]: http://i.stack.imgur.com/l9HXq.png
  [2]: http://i.stack.imgur.com/IEuQH.png

All Biwavelet Solutions on Gang of Coders

Total of 1 Biwavelet Solutions

Combine base and ggplot graphics in R figure window