gvisMap | R Documentation |
The gvisMap function reads a data.frame and creates text output referring to the Google Visualisation API, which can be included into a web page, or as a stand-alone page.
gvisMap(data, locationvar = "", tipvar = "", options = list(), chartid)
data |
a |
locationvar |
column name of
|
tipvar |
column name of |
options |
list of configuration options for Google Map. \Sexpr[results=rd]{gsub("CHARTNAME", googleChartName, readLines(file.path(".", "inst", "mansections", "GoogleChartToolsURLConfigOptions.txt")))} \Sexpr[results=rd]{paste(readLines(file.path(".", "inst", "mansections", "gvisOptions.txt")))} |
chartid |
character. If missing (default) a random chart id will be
generated based on chart type and |
The maps are the well known Google Maps.
returns list
of class
\Sexpr[results=rd]{paste(readLines(file.path(".", "inst",
"mansections", "gvisOutputStructure.txt")))}
Markus Gesmann markus.gesmann@gmail.com,
Diego de Castillo decastillo@gmail.com
Google Chart Tools API: \Sexpr[results=rd]{gsub("CHARTNAME", googleChartName, readLines(file.path(".", "inst", "mansections", "GoogleChartToolsURL.txt")))}
See also print.gvis
, plot.gvis
for printing and
plotting methods, gvisGeoChart
for an alternative to gvisMap
.
## Please note that by default the googleVis plot command ## will open a browser window and requires Internet ## connection to display the visualisation. ## Example with latitude and longitude information ## Plot Hurricane Andrew (1992) storm path: data(Andrew) M1 <- gvisMap(Andrew, "LatLong" , "Tip", options=list(showTip=TRUE, showLine=TRUE, enableScrollWheel=TRUE, mapType='hybrid', useMapTypeControl=TRUE, width=800,height=400)) plot(M1) ## Example with address, here UK post-code and some html code in tooltip df <- data.frame(Postcode=c("EC3M 7HA", "EC2P 2EJ"), Tip=c("<a href='https://www.lloyds.com'>Lloyd's</a>", "<a href='https://www.guildhall.cityoflondon.gov.uk/'>Guildhall</a>")) M2 <- gvisMap(df, "Postcode", "Tip", options=list(showTip=TRUE, mapType='normal', enableScrollWheel=TRUE)) plot(M2) ## Change mapping icons M3 <- gvisMap(df, "Postcode", "Tip", options=list(showTip=TRUE, mapType='normal', enableScrollWheel=TRUE, icons=paste0("{", "'default': {'normal': 'https://icons.iconarchive.com/", "icons/icons-land/vista-map-markers/48/", "Map-Marker-Ball-Azure-icon.png',\n", "'selected': 'https://icons.iconarchive.com/", "icons/icons-land/vista-map-markers/48/", "Map-Marker-Ball-Right-Azure-icon.png'", "}}"))) plot(M3)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.