Creando los dos vectores
nombres <- c('RUBEN', 'CARLOS', 'PATY', 'ALEJANDRO', 'LUISA',
'ROGELIO', 'ANDREA', 'FABIOLA', 'MARIA', 'FERNANDO')
apellidos <- c('GONZALEZ', 'MEDINA', 'ROBLES', 'JUAREZ', 'RUIZ',
'PIZARRO', 'RODRIGUEZ', 'CARRETE', 'CAMPOS', 'GOMEZ')
nombres ; apellidos
## [1] "RUBEN" "CARLOS" "PATY" "ALEJANDRO" "LUISA"
## [6] "ROGELIO" "ANDREA" "FABIOLA" "MARIA" "FERNANDO"
## [1] "GONZALEZ" "MEDINA" "ROBLES" "JUAREZ" "RUIZ"
## [6] "PIZARRO" "RODRIGUEZ" "CARRETE" "CAMPOS" "GOMEZ"
Generando mil nombres y mil apellidos
milnombres <- sample(nombres, 1000, replace = TRUE)
milapellidos <- sample(apellidos, 1000, replace = TRUE)
Generando 10 nombres y apellidos completos Nombre, Paterno y Materno
noms <- sample(milnombres, 10)
apesP <- sample(milapellidos, 10)
apesM <- sample(milapellidos, 10)
nombresCompletos <- data.frame(noms, apesP, apesM)
colnames(nombresCompletos) <- c("Nombre", "Apellido.P", "Apellido.M")
nombresCompletos
## Nombre Apellido.P Apellido.M
## 1 PATY RODRIGUEZ GOMEZ
## 2 PATY CARRETE JUAREZ
## 3 FERNANDO MEDINA RODRIGUEZ
## 4 CARLOS RODRIGUEZ PIZARRO
## 5 PATY CARRETE CAMPOS
## 6 FABIOLA RODRIGUEZ CARRETE
## 7 FERNANDO CARRETE RODRIGUEZ
## 8 ALEJANDRO JUAREZ PIZARRO
## 9 FERNANDO GOMEZ CAMPOS
## 10 FABIOLA GONZALEZ RUIZ
Creando una función
generaNombres <- function(losnombres, losapellidos, cuantos) {
milnombres <- sample(nombres, 1000, replace = TRUE)
milapellidos <- sample(apellidos, 1000, replace = TRUE)
noms <- sample(milnombres, cuantos)
apesP <- sample(milapellidos, cuantos)
apesM <- sample(milapellidos, cuantos)
nombresCompletos <- data.frame(noms, apesP, apesM)
colnames(nombresCompletos) <- c("Nombre", "Apellido.P", "Apellido.M")
nombresCompletos
}
Llamando la función creada
personas <- generaNombres(nombres, apellidos, 100)
personas
## Nombre Apellido.P Apellido.M
## 1 RUBEN GOMEZ ROBLES
## 2 LUISA ROBLES CARRETE
## 3 FABIOLA PIZARRO JUAREZ
## 4 CARLOS ROBLES GONZALEZ
## 5 CARLOS CAMPOS GONZALEZ
## 6 ANDREA MEDINA PIZARRO
## 7 ROGELIO MEDINA RODRIGUEZ
## 8 ANDREA RODRIGUEZ CAMPOS
## 9 ANDREA CARRETE PIZARRO
## 10 LUISA ROBLES RODRIGUEZ
## 11 PATY RUIZ ROBLES
## 12 ANDREA CARRETE CAMPOS
## 13 PATY PIZARRO CAMPOS
## 14 FERNANDO ROBLES GOMEZ
## 15 FERNANDO GONZALEZ PIZARRO
## 16 ANDREA RUIZ GOMEZ
## 17 MARIA ROBLES MEDINA
## 18 ROGELIO RODRIGUEZ PIZARRO
## 19 FABIOLA MEDINA JUAREZ
## 20 MARIA ROBLES RUIZ
## 21 ALEJANDRO CARRETE GONZALEZ
## 22 CARLOS JUAREZ MEDINA
## 23 CARLOS CARRETE PIZARRO
## 24 ANDREA PIZARRO MEDINA
## 25 FERNANDO CAMPOS PIZARRO
## 26 CARLOS GONZALEZ CARRETE
## 27 LUISA RUIZ GONZALEZ
## 28 RUBEN JUAREZ MEDINA
## 29 ANDREA PIZARRO GOMEZ
## 30 ANDREA ROBLES GOMEZ
## 31 LUISA RUIZ CAMPOS
## 32 LUISA CARRETE RUIZ
## 33 MARIA RUIZ ROBLES
## 34 RUBEN RUIZ CARRETE
## 35 MARIA GONZALEZ CARRETE
## 36 PATY GONZALEZ GONZALEZ
## 37 MARIA CARRETE JUAREZ
## 38 MARIA RODRIGUEZ GOMEZ
## 39 LUISA CAMPOS RUIZ
## 40 CARLOS RUIZ GONZALEZ
## 41 PATY GONZALEZ CAMPOS
## 42 ROGELIO RUIZ GONZALEZ
## 43 ALEJANDRO GONZALEZ PIZARRO
## 44 ALEJANDRO GOMEZ RUIZ
## 45 ROGELIO RODRIGUEZ MEDINA
## 46 RUBEN CAMPOS CARRETE
## 47 RUBEN MEDINA JUAREZ
## 48 FERNANDO GOMEZ GOMEZ
## 49 RUBEN CAMPOS PIZARRO
## 50 FERNANDO CAMPOS GOMEZ
## 51 LUISA GONZALEZ ROBLES
## 52 PATY JUAREZ CAMPOS
## 53 FERNANDO ROBLES GOMEZ
## 54 MARIA RODRIGUEZ JUAREZ
## 55 ALEJANDRO RUIZ JUAREZ
## 56 PATY GOMEZ ROBLES
## 57 CARLOS RUIZ GOMEZ
## 58 ROGELIO PIZARRO MEDINA
## 59 FABIOLA GOMEZ ROBLES
## 60 RUBEN GOMEZ ROBLES
## 61 LUISA RODRIGUEZ GONZALEZ
## 62 RUBEN PIZARRO ROBLES
## 63 ALEJANDRO GOMEZ PIZARRO
## 64 FABIOLA GOMEZ RUIZ
## 65 PATY CARRETE RODRIGUEZ
## 66 RUBEN MEDINA ROBLES
## 67 LUISA ROBLES GOMEZ
## 68 MARIA CAMPOS GONZALEZ
## 69 ROGELIO PIZARRO GONZALEZ
## 70 RUBEN MEDINA ROBLES
## 71 MARIA GONZALEZ GONZALEZ
## 72 FERNANDO PIZARRO CARRETE
## 73 ANDREA GOMEZ MEDINA
## 74 ANDREA RUIZ RODRIGUEZ
## 75 FERNANDO JUAREZ RUIZ
## 76 ANDREA RODRIGUEZ GONZALEZ
## 77 ANDREA MEDINA RUIZ
## 78 FERNANDO CARRETE JUAREZ
## 79 FERNANDO PIZARRO JUAREZ
## 80 LUISA JUAREZ GONZALEZ
## 81 RUBEN GONZALEZ GOMEZ
## 82 ANDREA GONZALEZ CARRETE
## 83 FABIOLA RODRIGUEZ MEDINA
## 84 LUISA GOMEZ RODRIGUEZ
## 85 ALEJANDRO GONZALEZ GONZALEZ
## 86 FABIOLA MEDINA JUAREZ
## 87 ALEJANDRO RUIZ GONZALEZ
## 88 FABIOLA JUAREZ GOMEZ
## 89 MARIA CARRETE PIZARRO
## 90 LUISA CARRETE ROBLES
## 91 ROGELIO MEDINA CARRETE
## 92 RUBEN CARRETE GONZALEZ
## 93 FERNANDO CARRETE MEDINA
## 94 CARLOS RUIZ RODRIGUEZ
## 95 ANDREA GONZALEZ ROBLES
## 96 ALEJANDRO JUAREZ ROBLES
## 97 FERNANDO MEDINA ROBLES
## 98 MARIA RUIZ RUIZ
## 99 ALEJANDRO ROBLES CARRETE
## 100 LUISA CAMPOS CAMPOS