language_choices <- function() { c( "🇬🇧 English" = "en", "🇹🇿 Kiswahili" = "sw", "🇩🇰 Dansk" = "da" ) }