我正在尝试用一些学校创建一个简单的ggmap.我可以轻松地将学校显示为地图上的点(下面的代码).但是,我想带一个学校图标的图像来代替点.
据我所知,annotation_custom不起作用,因为它需要笛卡尔坐标.插图应该有用,但这会为一所学校带来形象,而不是全部.再次尝试将点角色更改为图像,而不仅仅是添加图像.
我怀疑答案在于grImport,subplot以及可能与geom_point对话的功能.但是,我不知所措.
这是一种图像类型,可以作为一个图标:维基媒体毕业帽
这个问题的答案ggplot2中的刻度标记图像可以很好地添加图像,但是,我想将图像用作点字符,并能够根据属性更改颜色,大小等.
# Load needed packages
# install.packages(c("rgdal", "rgeos", "maptools", "ggmap", "sp", "plyr", "XML", "grImport"))
library(rgdal)
library(rgeos)
library(maptools)
library(ggmap)
library(sp)
library(plyr)
library(XML)
library(grImport)
# Define a value for the Seattle Public Schools (SPS) url:
SPSurl <- "http://www.seattleschools.org/modules/cms/pages.phtml? pageid=197023&sessionid=95b8499fc128fde5d7e1335751c73fee&t"
# All of the addresses for SPS, multiple tables:
SPSaddresses <- readHTMLTable(SPSurl)
# Just elementary schools
SPSelementary <- readHTMLTable(SPSurl, which=3, header=T)
# Just keep the names of the schools and addresses
SPSelementary <- SPSelementary[,c(1,3)] …