更改googleVis R包中gvisMap上的点颜色

时间:2014-11-28 00:08:01

标签: r google-maps googlevis gvisgeomap

我在R中使用googleVis包,特别是我正在尝试使用gvisMap命令解决问题。例如,我将使用显示here的Hurriance Andrew数据:

AndrewMap <- gvisMap(Andrew, "LatLong" , "Tip", 
                     options=list(showTip=TRUE, 
                                  showLine=TRUE, 
                                  enableScrollWheel=TRUE,
                                  mapType='terrain', 
                                  useMapTypeControl=TRUE))
plot(AndrewMap)

我想改变点的颜色。例如,使用gvisGeoMap或gvisGeoChart我可以根据一些变量使点不同颜色,但问题是你放弃了使用gvisMap获得的缩放,居中和滚动。我也有分类的,而不是连续的数据,所以我想使用gvisMap根据归因于该点的一些分类变量对点进行着色。

我试过搞乱选项,但这些只是配置选项,看起来gvisMap本身没有默认选项来改变点颜色。有关替代方法的任何建议吗?

1 个答案:

答案 0 :(得分:2)

尝试使用plotGoogleMaps包。 这对我有用。

library(plotGoogleMaps); library(sp)
library(googleVis) # for the data
data(Andrew)
coordinates(Andrew) = ~ Long + Lat      
proj4string(Andrew) = CRS("+proj=longlat +datum=WGS84")
Andrew2 <- SpatialPointsDataFrame(Andrew, data = data.frame( ID = row.names(Andrew) ) )  
m <- plotGoogleMaps(Andrew2, filename='myMap1.html')

此外,这适用于分类变量。

ic <- iconlabels(attribute = Andrew$Category, colPalette=rainbow(3), icon=TRUE, at=NULL, height=10, scale=0.6)
m <- plotGoogleMaps(Andrew2, filename='myMap1.html', iconMarker=ic)

我在plotGoogleMaps包中找到了更多种类的控件,虽然非专家对坐标的处理更加困难,但是可以访问。