if (FALSE) {
# Translate a single text
toSpanish("Hallo Welt!", auth_key = "my_key")
# Translate multiple texts and return the detected language
texts <- c("My name is Fred.", "Je suis médecin.", "Ich komme aus der Schweiz.")
toSpanish(texts, get_detect = T, auth_key = "x")
}
Run the code above in your browser using DataLab