Playing around with ggvis package