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] "Wilderman, Smith and Wyman"
ch_company(10)
#> [1] "Mante, Maggio and Hoppe" "Batz-Batz"
#> [3] "Haag Ltd" "Feil-Wuckert"
#> [5] "Cassin Group" "Raynor, Borer and Moen"
#> [7] "Collier, Kuhlman and Pfannerstill" "Fay-O'Reilly"
#> [9] "Smith-Stokes" "Robel, Haag and Ortiz"
# or even ch_company(500)
ch_company(locale = "fr_FR", n = 10)
#> [1] "Baron" "Gilbert"
#> [3] "Boulay S.A.R.L." "Guibert"
#> [5] "Duhamel" "Tessier et Fils"
#> [7] "Gaillard Gaillard et Fils" "Ménard SA"
#> [9] "Boulanger Boulanger S.A.R.L." "Collét"
ch_company(locale = "cs_CZ", n = 10)
#> [1] "Bartošová Němcová s.r.o." "Holubová"
#> [3] "Krejčí a.s." "Štěpánek s.r.o."
#> [5] "Kolář Bartošová o.s." "Poláková"
#> [7] "Kučerová Pokorný o.s." "Němec"
#> [9] "Zemanová Malá o.s." "Vlček Procházková a.s."
ch_company(locale = "es_MX", n = 10)
#> [1] "Bustamante, Zepeda y Durán" "Chávez y Serrano e Hijos"
#> [3] "Industrias Fierro-Miranda" "Gómez, Ceballos y Mercado"
#> [5] "Peralta y Lozada S.C." "Proyectos Girón, Colón y Aponte"
#> [7] "Grupo Bañuelos, Rodrígez y González" "Mercado y Laureano S.A. de C.V."
#> [9] "Hurtado S.A. de C.V." "Laboratorios Olivares-Loya"
ch_company(locale = "hr_HR", n = 10)
#> [1] "Matošević d.o.o." "Vidović"
#> [3] "Oršoš Bosilj d.o.o." "Rendulić"
#> [5] "Valjetić j.d.o.o." "Kresonja Horak j.d.o.o."
#> [7] "Terzić Ilić d.d." "Barešić"
#> [9] "Cvenić" "Preočanin"