if (FALSE) {
# Open a chart object
myChart <- chart(myProject, chart = "My Chart")
# Set the format for the chart panels
myChart <- chartOptionsFormat(myChart, noDataAsZero = TRUE,
showDataPoints = FALSE,
showDataPointsOnly = FALSE,
showPanelTitles = TRUE,
showToolTips = TRUE,
showNoDataPanels = FALSE,
lineWidth = 1)
# Return a dataframe of the current font settings
myChart <- chartOptionsFormat(myChart)
}
Run the code above in your browser using DataLab