<div dir="ltr"><div class="gmail_default" style="font-family:georgia,serif;font-size:large">Prezados, bom dia.</div><div class="gmail_default" style="font-family:georgia,serif;font-size:large">Gostaria de saber como posso trabalhar com mapas tematicos no R, pois trabalhava com o software geoda e neste conseguia criar mapas tematicos, calcular o indice de moran, LISA, entre outros.</div>
<div class="gmail_default" style="font-family:georgia,serif;font-size:large">Encontrei na internet comandos para calcular o indice de moran, mas a construção dos mapas tematicos não consegui.</div><div class="gmail_default" style="font-family:georgia,serif;font-size:large">
Segue os comando que estou utilizando:</div><div class="gmail_default" style="font-family:georgia,serif;font-size:large"><br></div><div class="gmail_default"><font face="georgia, serif" size="4"><br></font></div><div class="gmail_default">
<font face="georgia, serif" size="4">## lendo dados tipo shapefile</font></div><div class="gmail_default"><font face="georgia, serif" size="4">brasil <- readShapePoly("G:/natalia/BRASIL.shp", IDvar="UF")</font></div>
<div class="gmail_default"><font face="georgia, serif" size="4">plot(brasil)</font></div><div class="gmail_default"><font face="georgia, serif" size="4">head(brasil@data)  #para ler a primeira linha como cabeçalho</font></div>
<div class="gmail_default"><font face="georgia, serif" size="4"><br></font></div><div class="gmail_default"><font face="georgia, serif" size="4">brasil@data$NOME <- as.character(brasil@data$UF)</font></div><div class="gmail_default">
<font face="georgia, serif" size="4"><br></font></div><div class="gmail_default"><font face="georgia, serif" size="4">dados <- read.table("G:/natalia/dados.csv", sep=";", head=T, enc="latin1")</font></div>
<div class="gmail_default"><font face="georgia, serif" size="4">head(dados)</font></div><div class="gmail_default"><br></div><div class="gmail_default"><div class="gmail_default">UF    Estado Analfabetismo Homicidio    Renda</div>
<div class="gmail_default">1 AC      Acre         15.19  21.55768 663.2902</div><div class="gmail_default">2 AL   Alagoas         22.52  59.18695 378.0110</div><div class="gmail_default">3 AM     Amapa          7.89  30.48163 521.1194</div>
<div class="gmail_default">4 AP  Amazonas          9.60  26.99392 485.6758</div><div class="gmail_default">5 BA     Bahia         15.39  36.51580 463.8209</div><div class="gmail_default">6 CE     Ceara         17.19  25.34000 427.8397</div>
</div><div class="gmail_default"><font face="georgia, serif" size="4"><br></font></div><div class="gmail_default"><font face="georgia, serif" size="4">#junta o shape com os dados pela varivel comum </font><span style="font-family:georgia,serif;font-size:large">ind</span><br>
</div><div class="gmail_default"><font face="georgia, serif" size="4">ind <- match(brasil@data$UF, dados$UF)</font></div><div class="gmail_default"><br></div><div class="gmail_default"><font face="georgia, serif" size="4"><br>
</font></div><div class="gmail_default"><font face="georgia, serif" size="4">dados <- dados[ind,]</font></div><div class="gmail_default"><font face="georgia, serif" size="4">row.names(dados) <- brasil$UF</font></div>
<div class="gmail_default"><font face="georgia, serif" size="4"><br></font></div><div class="gmail_default"><font face="georgia, serif" size="4"> #linca dados com formato espacial</font><span style="font-family:georgia,serif;font-size:large"> </span><font face="georgia, serif" size="4"><br>
</font></div><div class="gmail_default"><font face="georgia, serif" size="4">brasil <- spCbind(brasil, dados)</font></div><div class="gmail_default"><font face="georgia, serif" size="4"><br></font></div><div class="gmail_default">
<font face="georgia, serif"><div class="gmail_default" style="font-size:large">names(brasil)</div><div class="gmail_default" style="font-size:large"><br></div><div class="gmail_default">[1] "UF"            "ESTADO"        "REGIAO"        "NOME"          "UF.1"         </div>
<div class="gmail_default">[6] "Estado"        "Analfabetismo" "Homicidio"     "Renda"<font size="4">  </font></div><div class="gmail_default" style="font-size:large"><br></div><div class="gmail_default" style="font-size:large">
head(brasil@data)</div><div class="gmail_default" style="font-size:large"><br></div><div class="gmail_default"><div class="gmail_default">UF   ESTADO REGIAO NOME UF.1    Estado Analfabetismo Homicidio    Renda</div><div class="gmail_default">
AC AC     Acre     NO   AC   AC      Acre         15.19  21.55768 663.2902</div><div class="gmail_default">AL AL  Alagoas     NE   AL   AL   Alagoas         22.52  59.18695 378.0110</div><div class="gmail_default">AM AM Amazonas     NO   AM   AM     Amapa          7.89  30.48163 521.1194</div>
<div class="gmail_default">AP AP    Amap      NO   AP   AP  Amazonas          9.60  26.99392 485.6758</div><div class="gmail_default">BA BA    Bahia     NE   BA   BA     Bahia         15.39  36.51580 463.8209</div><div class="gmail_default">
CE CE    Cear      NE   CE   CE     Ceara         17.19  25.34000 427.8397</div><div class="gmail_default"><br></div><div class="gmail_default"><br></div><div class="gmail_default"><font size="4">Att, Natalia</font></div>
</div></font></div>
</div>