Create fake company names and other company bits
Examples
ch_company()
#> [1] "Block-O'Hara"
ch_company(10)
#> [1] "Erdman Inc" "Paucek-Braun"
#> [3] "Tillman PLC" "Lakin, Cronin and Hayes"
#> [5] "Rolfson Group" "Schuster, Tremblay and Hartmann"
#> [7] "Gislason PLC" "Pfeffer-Reichert"
#> [9] "Fahey and Sons" "Kirlin, Quitzon and Abbott"
# or even ch_company(500)
ch_company(locale = "fr_FR", n = 10)
#> [1] "Guyot et Fils" "Maurice SARL"
#> [3] "Letellier Letellier SARL" "Ramos SA"
#> [5] "Moulin S.A." "Boucher"
#> [7] "Tessier SA" "Boutin"
#> [9] "Silva" "Pereira Pereira S.A.R.L."
ch_company(locale = "cs_CZ", n = 10)
#> [1] "Fialová" "Dvořáková Procházková a.s."
#> [3] "Hájková a.s." "Kučera a.s."
#> [5] "Blažek" "Zeman a.s."
#> [7] "Marešová a.s." "Říhová"
#> [9] "Malý Hájek a.s." "Křížová s.r.o."
ch_company(locale = "es_MX", n = 10)
#> [1] "Proyectos Solorio, Sanches y Segovia"
#> [2] "Vega S.C."
#> [3] "Alonzo y Asociados"
#> [4] "Industrias Hernádez, Vargas y Escobedo"
#> [5] "Cardenas S.A. de C.V."
#> [6] "Grupo Segovia, Toledo y Grijalva"
#> [7] "Corporativo Correa-Reyna"
#> [8] "Casanova y Gaona y Asociados"
#> [9] "Despacho Ojeda-Pichardo"
#> [10] "Club Soria y Gastélum"
ch_company(locale = "hr_HR", n = 10)
#> [1] "Kligl Penić d.d." "Peruško"
#> [3] "Krpan" "Bosilj"
#> [5] "Vidaković Botić j.d.o.o." "Polović Vranić d.o.o."
#> [7] "Kopjar" "Josipović Barušić j.d.o.o."
#> [9] "Modrić Gotić d.d." "Pandurić Nižetić d.o.o."