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] < [email protected]> 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] <http://user/SendEmail.jtp?type=node&node=4077646&i=0> > > 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] <http://user/SendEmail.jtp?type=node&node=4077646&i=1> > 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. > > > ------------------------------ > If you reply to this email, your message will be added to the discussion > below: > > http://r-br.2285057.n4.nabble.com/R-br-Duvida-Pintar-polygono-de-Mapa-tp4073543p4077646.html > To unsubscribe from R-br, click > here<http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=unsubscribe_by_code&node=3357982&code=cGVkcm8ucmFmYWVsLm1hcmluaG9AZ21haWwuY29tfDMzNTc5ODJ8NTAyMjI0MDYw> > . > NAML<http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=macro_viewer&id=instant_html%21nabble%3Aemail.naml&base=nabble.naml.namespaces.BasicNamespace-nabble.view.web.template.NabbleNamespace-nabble.view.web.template.InstantMailNamespace&breadcrumbs=instant+emails%21nabble%3Aemail.naml-instant_emails%21nabble%3Aemail.naml-send_instant_email%21nabble%3Aemail.naml> > -- Saudações, Pedro Rafael Diniz Marinho. Estatístico - Secretaria de Estado da Saúde - PB.
_______________________________________________ R-br mailing list [email protected] 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.
