ui_people_dict.R

In c5sire/yml2shiny: A Good Title

#' ui_dict
#'
#' get ui dictionary
#'
#' @return list
#' @export
ui_dict <- function(){
  list(
    FIRST_NAME  = list( 
en = 'First name', 
de = 'Vorname', 
es = 'nombre' 
),
 LAST_NAME  = list( 
en = 'Last name', 
de = 'Familienname', 
es = 'apellido' 
),
 AGE  = list( 
en = 'Age', 
de = 'Alter', 
es = 'edad' 
),
 BIRTHDAY  = list( 
en = 'Birthday', 
de = 'Geburtstag', 
es = 'cumpleanos' 
)
  )
}