@vagora, sería bueno que siempre adjuntes el código para analizar lo que estás haciendo. Me costo un poco darme cuenta cual era tu requerimiento y al no tener un ejemplo tuve que armar uno. La solución no pasa por usar zlim
, en realidad lo que conviene hacer es igualar los valores superiores a los limites que queres imponer. Veamos un ejemplo:
matriz <- structure(runif(400, 285, 300),
.Dim = c(10L, 40L)
)
matriz=t(apply(matriz,1,sort))
row.names(matriz) <- as.character.Date(seq(ISOdate(2011,8,1), by = "day", length.out = 10))
colnames(matriz) <- c(seq(1:40))
dates <- as.Date(dimnames(matriz)[[1]], "%Y-%m-%d")
depths <- as.numeric(dimnames(matriz)[[2]])
filled.contour(x=dates,
y=depths,
z=matriz,
xlab="Date",
ylab="Depth",
col = rev(colorRampPalette(c('darkred','red','blue','lightblue'))(25))
)
Este ejemplo genera el siguiente gráfico:
Si aplicamos zlim
al gráfico va a ocurrir lo que mostrabas
filled.contour(x=dates,
y=depths,
z=matriz,
xlab="Date",
ylab="Depth",
col = rev(colorRampPalette(c('darkred','red','blue','lightblue'))(25)),
zlim=c(290,295)
)
Pero lo que sí podemos hacer es igualar los valores inferiores y superiores de la matriz a los límites
matriz[matriz < 290] <- 290
matriz[matriz > 295] <- 295
Y entonces llegamos a quitar las superficies blancas