################################################################################
# Joshua C. Fjelstul, Ph.D.
# codebookr R package
################################################################################
inject <- function(x, z, at) {
a <- x[1:(at - 1)]
b <- x[(at + 1):length(x)]
out <- c(a, z, b)
return(out)
}
################################################################################
# end R script
################################################################################
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.