Create fake company names and other company bits
Arguments
- n
(integer) number of things to get, any non-negative integer
- locale
(character) the locale to use. See
company()$allowed_locales()
for locales supported.
Examples
ch_company()
#> [1] "Welch-Satterfield"
ch_company(10)
#> [1] "Lesch, Corwin and O'Keefe" "Eichmann-Kutch"
#> [3] "McDermott, Jakubowski and Mohr" "Blick Ltd"
#> [5] "Stiedemann Group" "Gislason-Kuphal"
#> [7] "Boyle PLC" "Littel, Mayert and Pacocha"
#> [9] "Kshlerin, Hauck and Hansen" "Batz, Mann and Murazik"
# or even ch_company(500)
ch_company(locale = "fr_FR", n = 10)
#> [1] "Blin" "Fontainé" "Garniér et Fils" "Légrand S.A."
#> [5] "Santos SARL" "Leduc" "Masson" "Paul S.A.R.L."
#> [9] "Joseph" "Morin Morin SARL"
ch_company(locale = "cs_CZ", n = 10)
#> [1] "Machová" "Soukup s.r.o." "Blažek"
#> [4] "Holub" "Malá o.s." "Šimková s.r.o."
#> [7] "Dušková Černá s.r.o." "Blažek" "Kopecký Machová o.s."
#> [10] "Krejčí Hájková a.s."
ch_company(locale = "es_MX", n = 10)
#> [1] "Razo-Alarcón"
#> [2] "Villanueva-Luevano"
#> [3] "Pedroza, Medrano y Trejo"
#> [4] "Ramos, Lira y Correa"
#> [5] "Laboratorios Malave, Olivas y Valdivia"
#> [6] "Cabán y Solorzano S.A."
#> [7] "Despacho Cepeda-Almaraz"
#> [8] "Riojas, Guevara y Mota"
#> [9] "Zapata S.A. de C.V."
#> [10] "Sisneros, Esquivel y Muro"
ch_company(locale = "hr_HR", n = 10)
#> [1] "Malnar d.d." "Sokić Klasić d.d."
#> [3] "Marušić" "Matas d.d."
#> [5] "Seničić d.o.o." "Tonc Maloča d.d."
#> [7] "Kramarić Bukvić j.d.o.o." "Žiković d.o.o."
#> [9] "Ignac" "Borošak"