Exemplo de ggmap com as cores nos estados.

ggmap_exemplo

require(abjutils)
require(ggmap)
# isso aqui é um bd que nós já preparamos há algum tempo e deixamos pronto caso alguém precise
data(br_uf_map)

# isso aqui é um bd auxiliar com os estados nas linhas e onde 
# cada coluna é uma variável que vc quer mostrar no mapa
estados <- data.frame(est=c('AC','AL','AM','AP','BA','CE','DF','ES','GO',
                            'MA','MG','MS','MT','PA','PB','PE','PI','PR',
                            'RJ','RN','RO','RR','RS','SC','SE','SP','TO'),
                      val=1:27,
                      stringsAsFactors=FALSE)

# esse código (usando dplyr) adiciona uma coluna com as siglas dos estados
# e faz um merge com o bd auxiliar criado anteriormente. Se não estiver
# ambientado com a sintaxe do dplyr de uma pesquisada, vale a pena
map_df <- br_uf_map %.%
  mutate(est = str_sub(as.character(br_uf_map$group), 1L, 2L)) %.%
  inner_join(estados, by='est')

# Esse é um ggplot minimal para gerar o mapa. Dá para tirar as grids
# manter o aspect-ratio, etc, é só pesquisar no google.
ggplot(map_df, aes(x=long, y=lat, fill=val)) +
  geom_map(map=map_df, aes(map_id=id)) +
  theme_bw()