as.shinystan function

Create and test shinystan objects