#' Classify a review as good or bad
#'
#' @param x Text to be classified, ideally a one-sentence product review.
#'
#' @importFrom randomForest randomForest
#' @export
#'
sentiment <- function(x) {
processed <- map_to_dtm(x)
as.character(stats::predict(ModelAsAPackage::review_rf, processed))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.