R help es - Feb 2013 - Contornos con escala de color

Alguien sabe como puedo dibujar sobre una imagen raster, los contornos
de niveles topograficos con un gradiente de color?
 
a) Si utilizo levelplot()+contourplot(XXXX scales = list(draw = FALSE),
at=seq(0,4000, by=100), col=br.palette(33), nlevels = 33, lwd=1, xlab="
", ylab=" ", margin = FALSE, labels=list(cex=0)) me salen todos
los
niveles con un solo color sobre la imagen raster.
 
b) Si utilizo levelplot()+contour(XXXX, col=br.palette(33), nlevels 33, lwd=1,
axes = FALSE, bg="transparent") me salen bien pero no se ve
debajo la imagen raster.

	[[alternative HTML version deleted]]

Hola,

A falta de un ejemplo reproducible, te respondo con un ejemplo que
espero sea ilustrativo:

library(lattice)

df <- expand.grid(x=seq(-2, 2, .01), y=seq(-2, 2, .01))
df$z <- with(df, (3*x^2 + y)*exp(-x^2-y^2))

contourplot(z~x*y, df, region = TRUE)

contourplot(z~x*y, df, region = TRUE, labels=FALSE)


Saludos.

Oscar.

Janue Miret, Jofre writes:
> Alguien sabe como puedo dibujar sobre una imagen raster, los contornos
> de niveles topograficos con un gradiente de color?
>  
> a) Si utilizo levelplot()+contourplot(XXXX scales = list(draw = FALSE),
> at=seq(0,4000, by=100), col=br.palette(33), nlevels = 33, lwd=1,
xlab="
> ", ylab=" ", margin = FALSE, labels=list(cex=0)) me salen
todos los
> niveles con un solo color sobre la imagen raster.
>  
> b) Si utilizo levelplot()+contour(XXXX, col=br.palette(33), nlevels >
33, lwd=1, axes = FALSE, bg="transparent") me salen bien pero no se ve
> debajo la imagen raster.
>
> 	[[alternative HTML version deleted]]
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es

-- 
Oscar Perpiñán Lamigueiro
Dpto. Ingeniería Eléctrica
EUITI-UPM
URL: http://procomun.wordpress.com
Twitter: @oscarperpinan