get_map改變顏色和位置

Question

我的數據幀看起來像這樣：

Sho  lat  lon  autoroute 
1000001 46.20114 5.19791   0 
1000002 46.21842 5.22767   1 
1000004 46.18836 5.24447   0 
1000006 46.20754 5.23758   1 
1000007 46.20105 5.24891   0 

我有下面的代碼：

basec=read.csv("map2.csv") 
map <- get_map(location = 'France', zoom = 6) 
mapPoints <- ggmap(map) + geom_point(aes(x = lon, y = lat, colour=autoroute), data = basec, alpha = 0.5, size=0.8) 

，輸出是：

如何我可以根據路線值更改點的顏色嗎？我想scale_colour_manual，但我得到了以下錯誤：

Error: Continuous value supplied to discrete scale 

而且你可以在法國的地圖的頂部看到出現小幅削減。我怎樣才能解決這個問題？

Answer 1

要解決的顏色值改變的變量因素：

basec$autoroute <- as.factor(basec$autoroute) 

此外，您還可以自己爲中心的地圖。使用不同的中心

cntr <- c(2.645, 47.45) 
map <- get_googlemap(center=cntr, zoom=6) 

如果這個中心仍然需要一些國家，你可以自己調整中心。