various ggvis and shiny test code