Nothing
library(HyperbolicDist)
### Test gigCheckPars
Theta <- c(-0.5,5,2.5)
gigCheckPars(Theta)
gigCheckPars(c(0.5,-5,2.5))
gigCheckPars(c(0.5,5,-2.5))
gigCheckPars(c(0.5,-5,-2.5))
gigCheckPars(c(0.5,0,2.5))
gigCheckPars(c(-0.5,0,2.5))
gigCheckPars(c(0.5,0,0))
gigCheckPars(c(-0.5,0,0))
gigCheckPars(c(0.5,5,0))
gigCheckPars(c(-0.5,5,0))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.