new("DataSet")
dataSet(categoryField = "categoryField")
setDataProvider(.Object = dataSet(), data.frame(key = c("FR", "US"), value = c(20,10)))
addFieldMapping(.Object = dataSet(), fieldMappings = list(fromField ="val1", toField ="value"))
addFieldMapping(.Object = dataSet(), fromField ="val1", toField ="value")
addStockEvent(.Object = dataSet(), backgroundAlpha = 1, backgroundColor = "#DADADA")
# equivalent to:
stockEvent_obj <- stockEvent(backgroundAlpha = 1, backgroundColor = "#DADADA")
addStockEvent(.Object = dataSet(), stockEvent = stockEvent_obj)
Run the code above in your browser using DataLab