Too much white space between caption and figure produced by tikzDevice and ggplot2 in LaTeX
<p>I'm currently using R's <code>ggplot2</code> and <code>tikzDevice</code> packages to produce graphics and introduce them in <code>LaTeX</code> documents, but I'm struggling with the resulting big white spaces between the figures and the captions, as you can see if you compare the images (I've manually highlighted the spaces to make it clearer):</p>

<p><a href="https://i.stack.imgur.com/Nmf8A.jpg" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/Nmf8A.jpg" alt="ggplot2 plot"></a>
<a href="https://i.stack.imgur.com/6iT79.jpg" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/6iT79.jpg" alt="tikz plot"></a></p>

<p>Here's my MWE:</p>

<p>The R code:</p>

<pre><code>library(ggplot2)
library(tikzDevice)

set.seed(1)
x &lt;- rnorm(200)

tikz(file = "Rplots.tex", width = 4, height = 4)
qplot(x, geom = "histogram")
dev.off()
</code></pre>

<p>and the LaTeX code:</p>

<pre><code>\documentclass{article}
\usepackage{tikz}

\begin{document}

\begin{figure}
\centering
\include{Rplots}
\caption{\texttt{ggplot2} plot.}
\end{figure}

\begin{figure}
\centering
\begin{tikzpicture}[scale=3]
    \clip (-0.1,-0.2)
    rectangle (1.8,1.2);
    \draw[step=.25cm,gray,very thin]
    (-1.4,-1.4) grid (3.4,3.4);
    \draw (-1.5,0) -- (2.5,0);
    \draw (0,-1.5) -- (0,1.5);
    \draw (0,0) circle (1cm);
    \filldraw[fill=green!20!white,
    draw=green!50!black]
    (0,0) -- (3mm,0mm)
    arc (0:30:3mm) -- cycle;
\end{tikzpicture}
\caption{\texttt{tikz} plot.}
\end{figure}

\end{document}
</code></pre>

<p>I'd like to know how to get rid of the great space between the caption and the figure <em>via</em> <code>ggplot2</code>.</p>

<p>PS. R version: 3.2.3, <code>ggplot2</code> version: 2.1.0, <code>tikzDevice</code> version: 0.10-1. I've taken the code for the second plot from Tobias Oetiker's <em>The Not so Short Introduction to LaTeX 2e</em>, version 5.05, page 116.</p>