Como eu poderia associar um vetor que criei com 16 cores aos dados? Eu tenho dados que variam de 1 a 16, e gostaria que os municípios que fossem 1 ficassem um uma cor, os que fossem 2 com outra e isso até 16. Não quero dividir em intervalos de classes, preciso que o mapa tenha 16 cores distintas.
Obrigado a todos desde já. Obrigado Paulo pelas dicas.
O único problema é que preciso de 16 classes e o classInt só faz 14 classes. Existe alguma forma de contornar isto?
Em 16 de novembro de 2011 16:48, Paulo Justiniano [via R-br] <ml-node+s2285057n4077646h3@n4.nabble.com> escreveu:
Rafael
A deia é criar um vetor de cores que quer utilizar da mesma dimansao das
suas unidades e passar isto para o argumento col
Veja um exemplo simplificado usando dados do pacote spdep
require(sp)
require(spdep)
require(classInt)
require(RColorBrewer)
## Carregando os dados (atributos e geometria de polygonos) disponíveis
no pacote spdep
## lendo dados tipo shapefiles
auckland <- readShapePoly(system.file("etc/shapes/auckland.shp",
package="spdep")[1])
## calclando a variável que se quer represetnar pelas cores
tx <- 1000*auckland$M77_85/(9*auckland$Und5_81)
## dividindo dados em classes (usando pacote classInt)
## veja ?classIntervals
(txINT<- classIntervals(tx, n=7))
## criando uma palheta de cores (usando pacote RColorBrewer) de azul
para vermelho
PAL <- c(rev(brewer.pal(3, "Blues")), brewer.pal(4, "Reds"))
## atribuindo as cores adequadas a cada grupo
cols <- findColours(txINT, PAL)
plot(auckland, col=cols)
Em Ter, 2011-11-15 às 15:21 -0300, Pedro Rafael escreveu:
> Pessoal plotei um arquivo shapfile de um mapa do Estado da Paraíba.
> Esse mapa apresente 16 regiões e cada região eu quero pintar com uma
> cor diferente (verde, azul, amarelo), corres não sequenciais. Estou
> conseguindo pintar os poligonos de cada região em separado. Criei uma
> variável no banco de dados (DBF) em que classifico o município enter 1
> a 16. O comando abaixo eu consigo pintar de vermelho aqueles
> municípios que tem a variável dados_regionais igual à 1 e de azul os
> que tem a variável igual à 2.
>
> plot(mapa, col=ifelse(dados_regionais == 1, "red", "white"), axes =
> "TRUE")
> plot(mapa, col=ifelse(dados_regionais == 2, "blue", "white"), axes =
> "TRUE")
>
> O problema é que a cada plot tenho um mapa diferente. Como destacar
> esses municípios em um mesmo mapa?
>
> --
> Saudações,
> Pedro Rafael Diniz Marinho.
> Estatístico - Secretaria de Estado da Saúde - PB.
>
>
>> _______________________________________________
> R-br mailing list
> [hidden email]
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
--
Paulo Justiniano Ribeiro Jr
LEG (Laboratorio de Estatistica e Geoinformacao)
Universidade Federal do Parana
Caixa Postal 19.081
CEP 81.531-990
Curitiba, PR - Brasil
Tel: (+55) 41 3361 3573
VOIP: (+55) (41) (3361 3600) 1053 1066
Fax: (+55) 41 3361 3141
e-mail: paulojus AT ufpr br
http://www.leg.ufpr.br/~paulojus
_______________________________________________
R-br mailing list
[hidden email]
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
http://r-br.2285057.n4.nabble.com/R-br-Duvida-Pintar-polygono-de-Mapa-tp4073543p4077646.htmlIf you reply to this email, your message will be added to the discussion below:
--
Saudações,Pedro Rafael Diniz Marinho.Estatístico - Secretaria de Estado da Saúde - PB.