R/HVL_defaults.R

#' Internal default values.
#'
#' This is a list with some internal default-values, that will be
#' used as references for the different functions in the package.
#'
#' @name HVL_defaults
#' @keywords internal

HVL_defaults <- list(
    tabPanel = list(
        selected_tab = "info",
        values = list(
            info = list(
                en = "Infomation",
                nn = "Informasjon",
                bm = "Informasjon"),
            parametric = list(
                en = "Parametric example",
                nn = "Parametrisk eksempel",
                bm = "Parametrisk eksempel"),
            lin.reg = list(
                en = "Linear regression",
                nn = "Lineær regresjon",
                bm = "Lineær regresjon"))),
    document.title = list(
        en = "HVL - under development",
        nn = "HVL - under utvikling",
        bm = "HVL - under utvikling"),
    select_language_intro = list(
        en = "TODO: Instructions-en blahbla + select language (?)",
        nn = "TODO: Instruksjon-nn blahblah + velg språk (?)",
        bm = "TODO: Instruksjon-bm blahblah + velg språk (?)"),
    select_language = list(
        label = list(
            en = "Select language for interface",
            nn = "Velg språk for grensesnittet",
            bm = "Velg språk for grensesnittet"),
        choices = list(
            en = "English",
            nn = "Norsk (nynorsk)",
            bm = "Quasi-dansk (bokmål)"),
        selected = "nn"),
    quit_label = list(
        en = "Quit",
        nn = "Avslutt",
        bm = "Avslutt"),
    insist_quit_label = list(
        en = "Yes, I DO want to quit!",
        nn = "Ja, eg VIL avslutte!",
        bm = "Ja, jeg VIL avslutte!"))



## list(
##             en = "",
##             nn = "",
##             bm = "")
LAJordanger/HVLstatistikk documentation built on June 21, 2019, 7:56 p.m.