# NOT RUN {
# initialize lama_dictinoary
dict <- new_lama_dictionary(
country = c(uk = "United Kingdom", fr = "France", NA_ = "other countries"),
language = c(en = "English", fr = "French"),
result = c("1" = "Very good", "2" = "Good", "3" = "Not so good")
)
## Example-1: Usage of 'lama_select'
# pick the translations 'result' and 'language'
# and add them to a new lama_dictionary
dict_sub <- lama_select(dict, result, language)
dict_sub
## Example-2: Usage of 'lama_select_'
# pick the translations 'result' and 'language'
# and add them to a new lama_dictionary
dict_sub <- lama_select_(dict, c("result", "language"))
dict_sub
# }
Run the code above in your browser using DataLab