Ich versuche, meine Polygone mit ggplot in R zu kennzeichnen. Ich habe hier ein Thema zum Stackoverflow gefunden, das meiner Meinung nach sehr nahe an dem liegt, was ich möchte, außer mit Punkten.

Beschrifte Punkte in geom_point

Ich habe einige Methoden online gefunden. Jetzt muss ich zuerst die zentrale Position jeder Form finden und dann diese Positionen zusammen mit dem Namen zusammenfügen. Dann verknüpfe dies mit der Beschriftungsfunktion in geom_text ()

ggplot zentrierte Namen auf einer Karte

Da ich es schon lange versucht habe, habe ich mich entschlossen, die Frage zu stellen und hoffe, dass jemand hier mir den letzten Schubs geben kann, was ich will. Meine Plotfunktion:

region_of_interest.fort <- fortify(region_of_interest, region = "score")
region_of_interest.fort$id <- as.numeric(region_of_interest.fort$id)
region_of_interest.fort$id <- region_of_interest.fort$id


region_of_interest.fort1 <- fortify(region_of_interest, region = "GM_NAAM")
region_of_interest.fort1$id <- as.character(region_of_interest.fort1$id)
region_of_interest.fort1$id <- region_of_interest.fort1$id

idList <- unique(region_of_interest.fort1$id)
centroids.df <- as.data.frame(coordinates(region_of_interest))
names(centroids.df) <- c("Longitude", "Latitude")
randomMap.df <- data.frame(id = idList, shading = runif(length(idList)), centroids.df)

ggplot(data = region_of_interest.fort, aes(x = long, y = lat, fill = id, group = group)) +
  geom_polygon() +
  geom_text(centroids.df, aes(label = id, x = Longitude, y = Latitude)) +
  scale_fill_gradient(high = "green", low = "red", guide = "colorbar") +
  coord_equal() +
  theme() +
  ggtitle("Title")

Es gibt mir den Fehler: ggplot2 kann nicht mit Daten der Klasse uneval umgehen

Meine Daten

region_of_interest$GM_NAAM
 [1] Groningen        Haren            Ooststellingwerf Assen            Aa en Hunze      Borger-    Odoorn   
 [7] Noordenveld      Westerveld       Tynaarlo         Midden-Drenthe  
415 Levels: 's-Gravenhage 's-Hertogenbosch Aa en Hunze Aalburg Aalsmeer Aalten ... Zwolle

region_of_interest$score
 [1] 10 -2 -1  2 -1 -4 -4 -5  0  0