The following graph plots global CO2 emissions data as obtained from CDIAC emissions timeseries page

We performed some very basic data gathering/processing with

data <- read.csv(url(data_url), skip = 28, header = T)
p <-plot_ly(data, x=~Year, y=~Total, color=~Total)

Here's the resulting plot