There's almost certainly a more elegant way to do it, but this works:
r <- raster(nrow=30, ncol=30, xmn=0)
r[]<-NA
r[393:409]<-99
r[423:439]<-99
r[453:455]<-99
r[456:460]<-30
r[461:469]<-99
r[483:499]<-99
r[513:529]<-99
plot(r,col=terrain.colors(100))
plot(edge(r, type="outer"), col=c("transparent", "black"), add=TRUE,
legend=FALSE)
plot(r,col=terrain.colors(100))
plot(edge(r, type="outer"), col=c("transparent", "black"), add=TRUE,
legend=FALSE)
plot(edge(edge(r, type="outer"), type="outer"), col=c("transparent",
"black"), add=TRUE,
legend=FALSE)
Also, Nabble is not the R-help list. Please include context in your
replies. Many people cannot or will not go look at the Nabble archives
to figure out what on earth you're talking about.
Sarah
On Thu, Jun 21, 2012 at 4:46 AM, riodementa <jorge.nayamac...@gmail.com> wrote:
> Lot of thanks Sarah!
> It works!, and sorry for don`t say that I'm using Windows7.
> And i have another question. Do you know if it is possible to plot the edge
> using 2 or more cells?
> What I'm trying to do is an edge wider, and i don'care lose some of the
> information inside or outside around the edge.
> Any idea?
>
> Again thanks
>
> --
> View this message in context:
> http://r.789695.n4.nabble.com/Edges-and-Rasters-tp4633966p4634075.html
> Sent from the R help mailing list archive at Nabble.com.
Lies, but not statistics.
--
Sarah Goslee
http://www.functionaldiversity.org
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
