new("GaugeAxis", alpha = 1)
gaugeAxis()
bands <- list(gaugeBand(), gaugeBand())
gaugeAxis(bands = bands)
# error
bands <- list(gaugeBand(), test = 1)
gaugeAxis(bands = bands)
addBand(.Object = gaugeAxis(), band = gaugeBand(test = "foo"))
Run the code above in your browser using DataLab