powered by
get_data(vis)
p <- cocaine %>% ggvis(~price) %>% layer_bars() get_data(p)
Run the code above in your browser using DataLab