Nothing
"pwm2vec" <-
function(pwm,...) {
if(length(pwm$betas) == 0) {
warning("argument is not a pwm object (no betas field)")
return(NULL)
}
return(pwm$betas)
}
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.