Great, thanks Amelia. Here is what I would do:
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")
Hi,
if your logo is in vector format you should probably try the grImport
package; see its vignette for examples, also below,
library(grImport)
## http://creativecommons.org/about/downloads/
PostScriptTrace("cc.logo.eps")
cc <- readPicture("cc.logo.eps.xml")
logo <- pictureGrob(cc[16:18], x=un
Amelia
You can persuade rasterImage() (and other functions) to draw
outside of the data region using xpd = NA or xpd = TRUE.
See the help for the par function.
D.
On 9/18/11 1:59 PM, Amelia McNamara wrote:
> If you run this, you'll see that I have some text at the bottom, but
> the logo i
If you run this, you'll see that I have some text at the bottom, but
the logo is within the plot borders.
plot(c(1.1, 2.3, 4.6), c(2.0, 1.6, 3.2), ylab="", xlab="")
mtext("X axis label", side=1, line=3)
mtext("Copyright statement", side=1, line=4, adj=0, cex=0.7)
library(png)
z <- readPNG("Cc.logo
Hi Amelia,
Can you give an example (using text where you want the CC is fine)?
Two angles I would try would be A) changing the regions or related but
more flexible (and hence complex) B) use grid of course if you're
making these with, say, ggplot2, you're already in grid (but then
mtext probably w
I am trying to add a copyright disclaimer outside the plot borders of
some images I have created. I can use mtext() to add the written
portion, but I would like to have the Creative Commons license image
(http://en.wikipedia.org/wiki/File:Cc.logo.circle.svg) before the
text. I've found that I can p
6 matches
Mail list logo
