testing a blog post with using ggvis