Knitr - изменить интервал между абзацами в чанках не удалось для диаграмм

Question

Я хотел уменьшить пространство между кусками в моем файле Rnw (LateX + R + Knitr). Я наткнулся на следующий файл Rnw, который работает для вывода текста: https://gist.github.com/yihui/2760395#file-knitrout-parskip-rnw. Если у вас есть диаграмма, которой нет - диаграмма перемещается слишком далеко вверх, и код, а также диаграмма перекрываются. Есть ли возможность переопределить knitrout, чтобы влиять на выводимый текст, а не на графики? Я не знаю, как прикрепить вывод PDF, но ниже приведен код.

\documentclass{article}

% change the space between paragraphs in chunks

\ifdefined\knitrout
  \renewenvironment{knitrout}{
    \setlength{\parskip}{-1in}
  }{
    \setlength{\parskip}{0in}
  }
\else
\fi

\begin{document}

The quick brown fox jumps over the lazy dog the quick brown fox jumps over the
lazy dog the quick brown fox jumps over the lazy dog.

The quick brown fox jumps over the lazy dog the quick brown fox jumps over the
lazy dog the quick brown fox jumps over the lazy dog.

<<test>>=
set.seed(77)
1+1
(x <- rnorm(30))
@

The quick brown fox jumps over the lazy dog the quick brown fox jumps over the
lazy dog the quick brown fox jumps over the lazy dog.

<<fig.height=3>>=
plot(x)
@
The quick brown fox jumps over the lazy dog the quick brown fox jumps over the
lazy dog the quick brown fox jumps over the lazy dog.

\end{document} 

Answer 1

Наконец я нашел решение здесь .

\usepackage{etoolbox}
\makeatletter
\preto{\@verbatim}{\topsep=-1em \partopsep=-1em }
\makeatother

Результат:

Answer 2

Просто используйте меньший отрицательный \parskip. Например, это выглядит хорошо для меня:

\ifdefined\knitrout
  \renewenvironment{knitrout}{
    \setlength{\parskip}{-0.5in}
  }{
    \setlength{\parskip}{0in}
  }
\else
\fi

Результат: