Fiz uma análise de cluster k-means fictícia. Quero criar uma legenda (cluster1, cluster2 e cluster3), a qual é representada pela variável "kmeans" (clusters formados). Também gostaria de adicionar um título ao meu mapa. Não sei se seria possível inserir uma escala. Se possível for, como fazer?

`library(sp)
library(rgdal)
library(RColorBrewer)`

`map<-readOGR("C:\\Users\\EU\\Desktop\\file","UFEBRASIL")
head(map@data)`

`ID CD_GEOCODU NM_ESTADO NM_REGIAO
0  1         11 RONDÔNIA     NORTE
1  2         12      ACRE     NORTE
2  3         13  AMAZONAS     NORTE
3  4         14   RORAIMA     NORTE
4  5         15     PARÁ     NORTE
5  6         16    AMAPÁ     NORTE`

`map@data$newvar1<-runif(27,20,100)
map@data$newvar2<-runif(27,20,100)
map@data$newvar3<-runif(27,20,100)
map@data$newvar4<-runif(27,20,100)
map@data$newvar5<-runif(27,20,100)
map@data$newvar6<-runif(27,20,100)`

`cluster<-kmeans(map@data[,c(5:10)],3)
cluster
map@data$kmeans<-c([["cluster"]])`

`palette(brewer.pal(5,"Blues")
palette()
plot(map,col=map@data$kmeans)`

[![Mapa resultate][1]][1]


  [1]: https://i.sstatic.net/78beZ.png



download do shapefile: <http://www.usp.br/nereus/?dados=brasil> (Unidades federativas)


Grato pela atenção (sou inexperiente no R).