library(knitr)
library(googleVis)
op <- options(gvis.plot.tag='chart')

2011 Transearch Truck Tons - FROM Study Area

2011 Transearch Truck Tons - TO Study Area

2040 Transearch Truck Tons - FROM Study Area

2040 Transearch Truck Tons - TO Study Area

2011 Transearch Rail Tons - FROM Study Area

2011 Transearch Rail Tons - TO Study Area

2040 Transearch Rail Tons - FROM Study Area

2040 Transearch Rail Tons - TO Study Area