<html>
<head>
<meta content="text/html; charset=ISO-8859-1"
http-equiv="Content-Type">
</head>
<body bgcolor="#FFFFFF" text="#000000">
Hello,<br>
Rolou na lista r-help algo bem similar a respeito de inclusão de
imagens em gráfico.<br>
Procure a thread por:<br>
--------------------------------------------------------------------<br>
Re: [R] Add png image outside plot borders<br>
--------------------------------------------------------------------<br>
no final de tudo, o camarada chamado Joshua Wiley colocou uma
função para fazer isso<br>
você pode adaptar à sua necessidade.<br>
<br>
Em todo caso, procure na net pela discussão!<br>
<br>
segue *** CÓPIA *** da funçao:<br>
##############################<br>
<pre wrap="">require(png)
require(grid)
## select the PNG file
z <- readPNG(file.choose())
## Function to draw your statement
copyright.draw <- function(label, image, x, y, size, ...) {
lab <- textGrob(label = label,
x = unit(x, "npc"), y = unit(y, "npc"),
just = c("left", "centre"), gp = gpar(...))
logo <- rasterGrob(image = image,
x = unit(x, "npc") + unit(1, "grobwidth", lab), y = unit(y, "npc"),
width = unit(size, "cm"), height = unit(size, "cm"),
just = c("left", "centre"), gp = gpar(...))
grid.draw(lab)
grid.draw(logo)
}
plot(1:10, 1:10)
copyright.draw("Copyright statement ", z, .02, .04, .5, fontsize = 8)
</pre>
<br>
<br>
<br>
<br>
<br>
<br>
Em 20/09/2011 15:14, Cézar Freitas escreveu:
<blockquote
cite="mid:CAPKwDoqZ1Fn9uW7O=hZ5d-PZP3Z3AN6PAqzLERkwBU_KjYY+vw@mail.gmail.com"
type="cite">Olá. Antes de já ir perguntando sem ter pesquisado, é
possível buscar nas mensagens anteriores dessa lista sobre minha
dúvida? A mesma herdou os tópicos da antiga lista?<br>
<br>
Não achei no Google, provavelmente porque estou usando as palavars
chave erradas.<br>
<br>
Tento introduzir um logotipo (em jpg ou png, por exemplo) no canto
de um gráfico (plot usual) para depois exportá-lo para pdf. Sei
que já fiz isso em xls, mas não lembro de já ter feito num plot
ativo para posterior exportação.<br>
<br>
Obrigado,<br>
Cézar Freitas<br>
<br>
<br>
<fieldset class="mimeAttachmentHeader"></fieldset>
<br>
<pre wrap="">_______________________________________________
R-br mailing list
<a class="moz-txt-link-abbreviated" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a>
<a class="moz-txt-link-freetext" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a>
Leia o guia de postagem (<a class="moz-txt-link-freetext" href="http://www.leg.ufpr.br/r-br-guia">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</pre>
</blockquote>
<br>
</body>
</html>