Aquí podría ser tu PUBLICIDAD


spplot celosía no puede crear la clave de color o crea una vertical cuando se necesita una horizontal

votos
0
library(lattice)
Data <- data.frame(Long=abs(rnorm(20,100,2)), Lat=abs(rnorm(20,40,2)), X=rnorm(20,20,2))
pd  <- subset(Data,select=c('Lat','Long'))
pd2 <- subset(Data,select=names(Data)[!names(Data)%in%c('Lat','Long')])
coordinates(pd) <- ~ Long + Lat
pd <- SpatialPoints(pd)
pd <- SpatialPointsDataFrame(pd, data = pd2)
cols <- brewer.pal(11, 'RdYlBu')

cuando se utiliza este comando:

spplot(pd, zcol = 'X', col.regions = cols, colorkey = list(space = 'top', col = cols))

O

spplot(pd, zcol = 'X', col.regions = cols, colorkey = draw.colorkey(key=list(at=seq(-20,20,1),col=cols)))

No crea el gráfico y recibo este error:

Error in legend`i`$fun : $ operator is invalid for atomic vectors

Cuando utilizo 'recortes' y cambie la clave de color en 'verdadero', señala a la clave de color, pero no tiene suficiente control sobre sus datos y lo más importante, no se puede cambiar la dirección de la clave de color a la horizontal.

spplot(pd, zcol = 'X', col.regions = cols, cuts=seq(min(Data$X),max(Data$X),1), colorkey = T, key.space='top')

introducir

Me gustaría crear algo como esto: introducir

Publicado el 03/06/2018 a las 02:15
fuente por usuario

Aquí podría ser tu PUBLICIDAD





Aquí
podría
ser
tu

PUBLICIDAD