#' Identify item names with special characters
#'
#' @param OCstack A stacked dataset of the CRFs see read.forms
#'
#' @author Tyler Hunt \email{tyler.hunt@@utah.edu}
specialChars<-function(OCstack){
items<-as.character(OCstack$ITEM_NAME)
items[!str_detect(items,"^[a-zA-Z0-9 _]*$")]
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.