if (FALSE) {
# Translate a single text
toFrench("Hallo Welt!", auth_key = "my_key")
# Translate multiple texts and return the detected language
texts <- c("Me llamo Fred.", "I'm a doctor.", "Ich komme aus der Schweiz.")
toFrench(texts, get_detect = T, auth_key = "x")
}
Run the code above in your browser using DataLab