library(ggplot2)
library(ggmap)
data <- read.table(file = "data.txt", sep = ",", col.names = c("lat", "lon", "place_name"), fill=FALSE, strip.white=TRUE)
# getting the map
mapgilbert <- get_map(location = c(lon = mean(data$lon), lat = mean(data$lat)),
zoom = "auto" , maptype = "roadmap", scale = 2, color = "bw")
# plotting the map with some points on it
ggmap(mapgilbert, extent = "device") +
geom_point(data = data, aes(x = lon, y = lat, fill = place_name), size = 0.5, shape = 22) +
guides(fill=FALSE, alpha=FALSE, size=FALSE)
これは、異なる色(ポイントの名前による)のポイントを生成します。このような何か:ボーダなしの地図上の描画ポイント
はしかし、私はポイントの黒い枠を取り除くたい。それを行う方法はありますか?
ストローク= 5またはストローク= 0? – MLavoie
訪問者と読者が簡単に利用できるように、再現性のあるコードを提供するために使用してください。 (例えば、 'data'が欠落しています。これは' dput(data) 'を使って追加することも、ダミーのデータフレームを作成することもできます) – lukeA
@lukeAそうです。私はそれを考えなかった。ごめんなさい! – iTurki