<div dir="ltr">Oi Fernando<div><br></div><div>Obrigado pelas dicas. Tentei usar o caminho do pdfcrop no Mac OS, mas não fui bem sucedido. Entretanto, tuas sugestões me deram ideia para pesquisar termos diferentes e Google. Acabei descobrindo que, ao colocar as linhas</div><div><br></div><div><div>knit_hooks$set(small.mar = function(before, options, envir) {</div><div> if (before) par(mar = c(14, 4, 0, 4)) </div><div>})</div><div>opts_chunk$set(fig.path='figure/beamer-',fig.align='center',fig.show='hold',size='footnotesize', small.mar=TRUE)</div><div><br></div></div><div>no meu chunk set, meu problema se resolveu.</div><div><br></div></div><div class="gmail_extra"><br><div class="gmail_quote">2015-03-24 18:23 GMT-03:00 Fernando Mayer <span dir="ltr"><<a href="mailto:fernandomayer@gmail.com" target="_blank">fernandomayer@gmail.com</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr">Uma opção, especialmente útil para slides, é remover automaticamente o espaço em branco ao redor (das bordas externas) da figura em PDF. Você pode setar isso com par(mar = ...). Mas uma ferramenta mais "bruta" e rápida para fazer isso, se você usa Linux, é usar o pdfcrop (precisa ser instalado a parte).<div><br></div><div>Basta colocar isso no seu chunk setup:</div><div><br></div><div><div>knit_hooks$set(pdfcrop = hook_pdfcrop)<br></div></div><div><br></div><div>e nos chunks com figura coloque pdfcrop=TRUE (ou coloque globalmente) para reduzir automaticamente a area do PDF ao compilar com o knitr. Por exemplo:</div><div><br></div><div><span style="font-size:12.8000001907349px"><<RegiaoGrafica01, pdfcrop=TRUE>>=</span><span class=""><br style="font-size:12.8000001907349px"><span style="font-size:12.8000001907349px">plot(0:10, 0:10)</span><br style="font-size:12.8000001907349px"><span style="font-size:12.8000001907349px">@</span><br></span></div><div><br></div><div>Até onde eu lembro ainda não havia uma solução para esse problema do espaço dentro do knitr, e essa era uma opção recomendada.</div><div><br></div><div><br></div><div class="gmail_extra"><div><div><div dir="ltr">---<br>Fernando de Pol Mayer<br>Laboratório de Estatística Ambiental - LEA<br>Instituto de Matemática, Estatística e Física - IMEF<br>Universidade Federal do Rio Grande - FURG<br>URL: <a href="http://fernandomayer.github.io" target="_blank">http://fernandomayer.github.io</a><br>e-mail: fernando.mayer [@] {<a href="http://gmail.com" target="_blank">gmail.com</a>, <a href="http://furg.br" target="_blank">furg.br</a>}</div></div></div>
<br><div class="gmail_quote">2015-03-24 16:43 GMT-03:00 Marcus Nunes <span dir="ltr"><<a href="mailto:marcus.nunes@gmail.com" target="_blank">marcus.nunes@gmail.com</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div class="h5"><div dir="ltr">Olá<div><br></div><div>Fiz esta pergunta há alguns minutos no StackExchange, mas ainda não obtive resposta. (aliás, se alguém quiser ler ela no contexto original e responder por lá ou, quem sabe, vê-la identada corretamente etc, o link é <a href="http://stackoverflow.com/questions/29240036/adjust-the-distance-between-code-and-figure-output-in-knitr" target="_blank">http://stackoverflow.com/questions/29240036/adjust-the-distance-between-code-and-figure-output-in-knitr</a> )</div><div><br></div><div>Estou escrevendo uma série de slides sobre as funcionalidades gráficas do R. Um dos meus slides é assim:</div><div><br></div>---<br><br>\begin{frame}[fragile]<br><br>\frametitle{A Região Gráfica}<br><br><<RegiaoGrafica01>>=<br>plot(0:10, 0:10)<br>@<br><br>\end{frame}<div>---</div><div><br></div><div>O problema é que meu slide compilado fica da seguinte forma:</div><div><br></div><div><a href="http://i.stack.imgur.com/3Ozdd.jpg" target="_blank">http://i.stack.imgur.com/3Ozdd.jpg</a><br></div><div><br></div><div>Meu gráfico está muito distante do código. Eu gostaria de saber se existe alguma opção no knitr que diminua esta distância. Já procurei no manual e não consegui encontrar nada do gênero.</div><div><br></div><div>Segue meu CMR (i.e., meu arquivo .rnw):</div><div><br></div><div>---<br>\documentclass[10pt, compress, usetitleprogressbar]{beamer}<br><br>\usetheme{m}<br><br>\usepackage{booktabs}<br>\usepackage[scale=2]{ccicons}<br>\usepackage{minted}<br>\usepackage{amssymb}<br>\usepackage{amsfonts}<br>\usepackage{amsmath}<br>\usepackage{amssymb}<br>\usepackage{amsthm}<br>\usepackage[portuges]{babel}<br>\usepackage{bm}<br>\usepackage{icomma}<br>\usepackage[retainorgcmds]{IEEEtrantools}<br>\usepackage{mathtools}<br>\usepackage{multirow}<br>\usepackage{natbib}<br>\usepackage{shadow}<br>\usepackage{subfigure}<br>\usepackage{tikz}<br>\usetikzlibrary{shapes.arrows}<br>\usepackage{verbatim}<br>\usepackage{xcolor}<br><br>\usepgfplotslibrary{dateplot}<br><br>\usemintedstyle{trac}<br><br>%%% Identification<br><br>\title{O Subsistema Gráfico}<br>\subtitle{EST0091 - Introdução ao R}<br>\date{26 de março de 2015}<br>\author{Marcus Nunes}<br>\institute{Universidade Federal do Rio Grande do Norte}<br><br>%%% New colors<br><br>\definecolor{mDarkBrown}{HTML}{604c38}<br>\definecolor{mDarkTeal}{HTML}{23373b}<br><br>\definecolor{mLightBrown}{HTML}{EB811B}<br>\definecolor{mMediumBrown}{HTML}{C87A2F}<br><br>\definecolor{mLightRed}{HTML}{EB331B}<br>\definecolor{mLightGreen}{HTML}{14B03D}<br>\definecolor{mLightTeal}{HTML}{137D91}<br><br>\begin{document}<br><br><br>% new commands<br><br>\newcommand{\R}{\mathbb{R}}<br>\newcommand{\Xb}{\bm{X}}<br>\newcommand{\Yb}{\bm{Y}}<br><br>%%%%%%%%%%%%%%%%%%%%%%<br><br>% knitr options<br><br><<setup, include=FALSE>>=<br>library(knitr)<br>opts_chunk$set(fig.path='figure/beamer-',fig.align='center',fig.show='hold',size='footnotesize')<br>@<br><br><<options, cache=FALSE, echo=FALSE, eval=TRUE, tidy=TRUE, dpi=144>>=<br>options(width=60)<br>#par(cex=2)<br>par(mar=c(0, 0, 0, 0))<br>opts_knit$set(out.format = "latex")<br>opts_chunk$set(prompt=TRUE, tidy.opts=list(width.cutoff=40), tidy=FALSE, fig.width=6, fig.height=4.5)<br>knit_theme$set("print2")<br>@<br><br>%%%%%%%%%%%%%%%%%%%%%%<br><br><br>\maketitle<br><br>%%%%%%%%%%%%%<br>%%% SLIDE %%%<br><br>\plain{A Região Gráfica}<br><br>%%%%%%%%%%%%%<br><br><br>%%%%%%%%%%%%%<br>%%% SLIDE %%%<br><br>\begin{frame}[fragile]<br><br>\frametitle{A Região Gráfica}<br><br><<RegiaoGrafica01>>=<br>plot(0:10, 0:10)<br>@<br><br>\end{frame}<br><br>%%%%%%%%%%%%%<br><br>\maketitle<br><br>\end{document}</div><div>---</div><div><br></div><div>Obrigado,<span><font color="#888888"><br>-- <br><div><div dir="ltr">Marcus Nunes<br><a href="http://marcusnunes.me/" target="_blank">http://marcusnunes.me/</a><br></div></div>
</font></span></div></div>
<br></div></div>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br></div></div>
<br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br><br clear="all"><div><br></div>-- <br><div class="gmail_signature"><div dir="ltr">Marcus Nunes<br><a href="http://marcusnunes.me/" target="_blank">http://marcusnunes.me/</a><br></div></div>
</div>