## File Name: mnlfa_assign_values_vector.R
## File Version: 0.02
mnlfa_assign_values_vector <- function(x, i, val)
{
z <- x[i]
if (length(x)<i){
z <- val
}
return(z)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.