gettext

R Base 3.6.2 🇮🇩 Bahasa Indonesia

Jika Dukungan Bahasa Asli diaktifkan di versi R ini, coba terjemahkan vektor karakter atau atur di mana terjemahan dapat ditemukan.

Syntax

gettext(&#8230;, domain = NULL)<p></p><p>ngettext(n, msg1, msg2, domain = NULL)</p><p>bindtextdomain(domain, dirname = NULL)</p>

Arguments

Parameter	Deskripsi
`…`	One or more character vectors.
`domain`	The ‘domain’ for the translation.
`n`	a non-negative integer.
`msg1`	the message to be used in English for n = 1.
`msg2`	the message to be used in English for n = 0, 2, 3, ….
`dirname`	The directory in which to find translated message catalogs for the domain.

Return Value

Untuk gettext, vektor karakter, satu elemen per string di…. Jika terjemahan tidak diaktifkan atau tidak ada domain yang ditemukan atau tidak ada terjemahan yang ditemukan di domain tersebut, string asli akan dikembalikan. Untuk ngettext, berupa string karakter. Untuk bindtextdomain, string karakter yang memberikan direktori dasar saat ini, atau NULL jika pengaturannya gagal.

Details

Jika domain adalah NULL atau "", dan gettext atau ngettext dipanggil dari fungsi dalam namespace paket pkg, domain diatur ke "R-pkg". Kalau tidak, tidak ada domain default. Jika domain yang sesuai ditemukan, setiap string karakter ditawarkan untuk diterjemahkan, dan diganti dengan terjemahannya ke dalam bahasa saat ini jika ditemukan. Nilai (logis) NA menekan terjemahan apa pun. Biasanya domain untuk pesan peringatan/kesalahan R dalam paket pkg adalah "R-pkg", dan untuk pesan tingkat C adalah "pkg". Untuk gettext, spasi awal dan akhir diabaikan saat mencari terjemahan. ngettext digunakan ketika pesan perlu divariasi dengan satu bilangan bulat. Menerjemahkan pesan-pesan tersebut tunduk pada aturan yang sangat spesifik untuk berbagai bahasa: lihat Manual GNU Gettext. String akan sering c

Contoh

Example

# NOT RUN {
bindtextdomain("R")  # non-null if and only if NLS is enabled

for(n in 0:3)
    print(sprintf(ngettext(n, "%d variable has missing values",
                              "%d variables have missing values"),
                  n))

# }
# NOT RUN {
## for translation, those strings should appear in R-pkg.pot as
msgid        "%d variable has missing values"
msgid_plural "%d variables have missing values"
msgstr[0] ""
msgstr[1] ""
# }
# NOT RUN {
miss <- c("one", "or", "another")
cat(ngettext(length(miss), "variable", "variables"),
    paste(sQuote(miss), collapse = ", "),
    ngettext(length(miss), "contains", "contain"), "missing values\n")

## better for translators would be to use
cat(sprintf(ngettext(length(miss),
                     "variable %s contains missing values\n",
                     "variables %s contain missing values\n"),
            paste(sQuote(miss), collapse = ", ")))
# }