#* @get /trollR
classify_text <- function(text = "Hello World - Sample Text"){
library(trollR)
troll <- predict_troll(text)
list(
text = text,
troll_certainty = troll
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.