## File Name: sirt_round_vector.R
## File Version: 0.04
sirt_round_vector <- function(x, digits)
{
if (is.numeric(x)){
x <- round( x, digits )
}
return(x)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.