Hello,
Rolou na lista r-help algo bem similar a respeito de inclusão de
imagens em gráfico.
Procure a thread por:
--------------------------------------------------------------------
Re: [R] Add png image outside plot borders
--------------------------------------------------------------------
no final de tudo, o camarada chamado Joshua Wiley colocou uma
função para fazer isso
você pode adaptar à sua necessidade.
Em todo caso, procure na net pela discussão!
segue *** CÓPIA *** da funçao:
##############################
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)
Em 20/09/2011 15:14, Cézar Freitas escreveu:
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?
Não achei no Google, provavelmente porque estou usando as palavars
chave erradas.
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.
Obrigado,
Cézar Freitas
_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.