as.vega function

Coerce an ggvis object to a vega list.