Displaying 4 results from an estimated 4 matches for "plotvar88".
2014 May 05
3
Mapa de quantiles con spplot
...o.
https://www.dropbox.com/s/umy0evt3qm1wr4d/dissolve.zip
Esto es lo que estoy haciendo:
library(rgdal)
library(maptools)
library(sp)
library(classInt)
library(RColorBrewer)
zm <- readOGR(?.?, ?zmdis?)
data <- read.csv(?part_pot.csv?, header=T, sep=?,?, dec=?.?)
zm en data=data.frame(data)
plotvar88 <- zm$part88
nclr <- 8
plotclr <- brewer.pal(nclr, ?Blues?)
class <- classIntervals(plotvar88, nclr, style=?quantile?)
colcode <- findColours(class, plotclr)
plot(zm)
plot(zm, col=colcode, add=T)
legend(3777189,2249615, legend=names(attar(colcode, ?table?)), fill=attr(colcode, ?palet...
2014 May 03
2
Mapa de quantiles con spplot
Hola,
Intento representar en un mapa participaciones porcentuales de los sectores económicos y no logro hacerlo con spplot.
He intentado con spplot(zm, c(?part88?, ?part93?), cuts=4, col.regions=brewer.pal(4, ?Set3?))
Lo pude hacer utilizando el base graphics de R, definiendo:
> plotvar88 <- zm$part88
> nclr <- 8
> plotclr <- brewer.pal(nclr, "PuOr")
> plotclr <- plotclr[nclr:1]
> class <- classIntervals(plotvar88, nclr, style="quantile")
> colcode <- findColours(class, plotclr)
> plot(zm)
> plot(zm, col=colcode, add=T)
>...
2014 May 06
3
Mapa de quantiles con spplot
...:
>>
>> library(rgdal)
>> library(maptools)
>> library(sp)
>> library(classInt)
>> library(RColorBrewer)
>> zm <- readOGR(?.?, ?zmdis?)
>> data <- read.csv(?part_pot.csv?, header=T, sep=?,?, dec=?.?)
>> zm en data=data.frame(data)
>> plotvar88 <- zm$part88
>> nclr <- 8
>> plotclr <- brewer.pal(nclr, ?Blues?)
>> class <- classIntervals(plotvar88, nclr, style=?quantile?)
>> colcode <- findColours(class, plotclr)
>> plot(zm)
>> plot(zm, col=colcode, add=T)
>> legend(3777189,2249615, l...
2014 May 07
2
Mapa de quantiles con spplot
...>>
>> library(rgdal)
>> library(maptools)
>> library(sp)
>> library(classInt)
>> library(RColorBrewer)
>> zm <- readOGR(?.?, ?zmdis?)
>> data <- read.csv(?part_pot.csv?, header=T, sep=?,?, dec=?.?)
>> zm en data=data.frame(data)
>> plotvar88 <- zm$part88
>> nclr <- 8
>> plotclr <- brewer.pal(nclr, ?Blues?)
>> class <- classIntervals(plotvar88, nclr, style=?quantile?)
>> colcode <- findColours(class, plotclr)
>> plot(zm)
>> plot(zm, col=colcode, add=T)
>> legend(3777189,2249615, l...