私はで働いていggmapます。目標は、マップ上に座標点をプロットし、その点に名前を付けてラベル付けすることです。名前、経度、緯度のデータフレームがあります。
データは次のようになります。
df <- structure(list(Station.Area = c("Balbriggan", "Blanchardstown",
"Dolphins Barn", "Donnybrook", "Dun Laoghaire", "Finglas"), Latitude = c(53.608319,
53.386813, 53.333532, 53.319259, 53.294396, 53.390325), Longitude = c(-6.18208,
-6.377197, -6.29146, -6.232017, -6.133867, -6.298401)), .Names =c("Station.Area","Latitude", "Longitude"), row.names = c(NA, 6L), class = "data.frame")
私が書いたコードは次のとおりです。
library(ggmap)
library(ggplot2)
dub_map <- get_map(location = "Dublin", zoom = "auto", scale="auto", crop = TRUE, maptype = "hybrid")
ggmap(dub_map) +`
geom_point(data = df, aes(x = Longitude, y = Latitude,
fill = "green", alpha =` `0.8, size = 5, shape = 21)) +`
guides(fill=FALSE, alpha=FALSE, size=FALSE)+
geom_text(label=df$Station.Area)+
scale_shape_identity()
しかし、私は得ています
エラー: 美学は長さ 1 であるか、データと同じでなければなりません (4): ラベル
サイズ、色、x & Y などのさまざまな美学を入れようとしましgeom_textたが、それでも同じエラーが発生します。
私は自分の目標のために正しくやっていますか？助けてください。
geom_text なしでこれを取得する 今、ポイントにラベルを付けたいだけです
