cmb_frame <- function(target, nontarget, buildFeature){
features <- as.data.frame(as.data.frame(t(sapply(c(target, nontarget), buildFeature))))
features$class <- F
features$class[1:length(target)] <- T
return(features)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.