if (FALSE) {
# Translate a single text
toGerman("Hello world!", auth_key = "my_key")
# Translate multiple texts and return the detected language
texts <- c("Me llamo Fred.", "Je suis médecin.", "I'm from Brisbane.")
toGerman(texts, get_detect = T, auth_key = "x")
}
Run the code above in your browser using DataLab