gvisSteppedAreaChart function

Google Stepped Area Chart with R googleChartName <- "steppedarechart"

gvisChartName <- "gvisSteppedAreChart"

The gvisSteppedAreaChart 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.

gvisSteppedAreaChart(data, xvar = "", yvar = "", options = list(), chartid)

Arguments

• data: a data.frame to be displayed as a stepped area chart.

• 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 line.

• options: list of configuration options, see:

  gsub("CHARTNAME", googleChartName, readLines(file.path(".", "inst","mansections", "GoogleChartToolsURLConfigOptions.txt")))

  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 tempfile

Returns

paste(gvisChartName) returns list of class

paste(readLines(file.path(".", "inst", "mansections","gvisOutputStructure.txt")))

Details

The stepped area chart is rendered within the browser using SVG or VML and displays tips when hovering over points.

Examples

## 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))

## Stepped Area chart
SteppedArea1 <- gvisSteppedAreaChart(df, xvar="country", yvar=c("val1", "val2"))
plot(SteppedArea1)

## Stacked chart
SteppedArea2 <- gvisSteppedAreaChart(df, xvar="country", yvar=c("val1", "val2"),
      options=list(isStacked=TRUE))
plot(SteppedArea2)

## Add a customised title
SteppedArea3 <- gvisSteppedAreaChart(df, xvar="country", yvar=c("val1", "val2"),
             options=list(title="Hello World",
                          titleTextStyle="{color:'red',fontName:'Courier',fontSize:16}"))
plot(SteppedArea3)

## Not run:

## Change y-axis to percentages
SteppedArea3 <- gvisSteppedAreaChart(df, xvar="country", yvar=c("val1", "val2"),
                       options=list(vAxis="{format:'#,###%'}"))
plot(SteppedArea3)
## End(Not run)

References

Google Chart Tools API: gsub("CHARTNAME", googleChartName, readLines(file.path(".", "inst","mansections", "GoogleChartToolsURL.txt")))

See Also

See also print.gvis, plot.gvis for printing and plotting methods

Author(s)

Markus Gesmann markus.gesmann@gmail.com ,

Diego de Castillo decastillo@gmail.com