Visualizando Comércio e Serviços

Ir para Fase 3.

Setamos o diretório de trabalho

rm(list = ls(all.names = TRUE))
library(leaflet)
workdirectory = "~/OneDrive/r-files/"
setwd(paste(workdirectory, "/TCC/", sep = ""))

como após a clusterização criamos um novo dataset com todos os alvarás classificados nos clusters correspondentes, basta agora carregar o dataset criado.

load("alvaras.rda")
names(alvaras)

## [1] "V1"      "V2"      "V3"      "V4"      "V5"      "cluster"

Plotamos o mapa com alvaras identificados de acordo com a atividade (Comércio e Serviço), com suas atividades específicas na popup clicável.

## [1] 68657     6

## [1] 108449      6

Ir para Fase 5.