View source: R/gvisCoreCharts.R
gvisColumnChart | R Documentation |
The gvisColumnChart 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.
gvisColumnChart(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, see: \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 |
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
## 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)) ## Column chart Col1 <- gvisColumnChart(df, xvar="country", yvar=c("val1", "val2")) plot(Col1) ## Stacked column chart Col2 <- gvisColumnChart(df, xvar="country", yvar=c("val1", "val2"), options=list(isStacked=TRUE)) plot(Col2) ## Add a customised title and and change width of columns Col3 <- gvisColumnChart(df, xvar="country", yvar=c("val1", "val2"), options=list(title="Hello World", titleTextStyle="{color:'red',fontName:'Courier',fontSize:16}", bar="{groupWidth:'100%'}")) plot(Col3) ## Not run: ## Change y-axis to percentages Col4 <- gvisColumnChart(df, xvar="country", yvar=c("val1", "val2"), options=list(vAxis="{format:'#,###%'}")) plot(Col4) ## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.