Description Usage Arguments Value Warning Author(s) References See Also Examples
The gvisBarChart 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. The actual chart is rendered by the web browser using SVG or VML.
1 | gvisBarChart(data, xvar = "", yvar = "", options = list(), chartid)
|
data |
a |
xvar |
name of the character column which contains the category labels for the x-axes. |
yvar |
a vector of column names of the numerical variables to be plotted. Each column is displayed as a separate bar/column. |
options |
list of configuration options for Google Bar Chart.
Further possible components are, taken from https://google-developers.appspot.com/chart/interactive/docs/gallery/barchart.html#Configuration_Options:
|
chartid |
character. If missing (default) a random chart id will be generated based on
chart type and |
gvisBarChart
returns a list of class
"gvis
" and "list
".
An object of class "gvis
" is a list containing at least the
following components:
|
Google visualisation type, here 'BarChart' |
|
character id of the chart object. Unique chart ids are required to place several charts on the same page. |
|
a list with the building blocks for a page
|
Google Visualisation API: You cannot load both barchart/columnchart and corechart packages at the same time on the same page.
Markus Gesmann markus.gesmann@gmail.com,
Diego de Castillo decastillo@gmail.com
Google Bar Chart API: http://code.google.com/apis/chart/interactive/docs/gallery/barchart.html
Follow the link for Google's data policy.
See also print.gvis
, plot.gvis
for
printing and plotting methods
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 | ## Please note that by default the googleVis plot command
## will open a browser window and requires an internet
## connection to display the visualisation.
df=data.frame(country=c("US", "GB", "BR"), val1=c(1,3,4), val2=c(23,12,32))
## Bar chart
Bar1 <- gvisBarChart(df, xvar="country", yvar=c("val1", "val2"))
plot(Bar1)
## Stacked bar chart
Bar2 <- gvisBarChart(df, xvar="country", yvar=c("val1", "val2"),
options=list(isStacked=TRUE))
plot(Bar2)
## Add a customised title and smoothed curve
Bar3 <- gvisBarChart(df, xvar="country", yvar=c("val1", "val2"),
options=list(title="Hello World",
titleTextStyle="{color:'red',fontName:'Courier',fontSize:16}",
curveType='function'))
plot(Bar3)
## Not run:
## Change x-axis to percentages
Bar4 <- gvisBarChart(df, xvar="country", yvar=c("val1", "val2"),
options=list(hAxis="{format:'#,###%'}"))
plot(Bar4)
## The following example reads data from a Wikipedia table and displays
## the information in a bar chart.
## We use the readHMLTable function of the XML package to get the data
library(XML)
## Get the data of the biggest ISO container companies from Wikipedia
##(table 3):
df=readHTMLTable(readLines("http://en.wikipedia.org/wiki/Intermodal_freight_transport"))[[3]][,1:2]
## Rename the second column
names(df)[2]="TEU capacity"
## The numbers are displayed with commas to separate thousands, so let's
## get rid of them:
df[,2]=as.numeric(gsub(",", "", as.character(df[,2])))
## Finally we can create a nice bar chart:
Bar5 <- gvisBarChart(df, options=list(
chartArea="{left:250,top:50,width:\"50%\",height:\"75%\"}",
legend="bottom",
title="Top 20 container shipping companies in order of TEU capacity"))
plot(Bar5)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.