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"milnombres <- sample(nombres, 1000, replace = TRUE)
milapellidos <- sample(apellidos, 1000, replace = TRUE)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 LUISA RODRIGUEZ JUAREZ
## 2 CARLOS MEDINA PIZARRO
## 3 ROGELIO RUIZ CAMPOS
## 4 LUISA CARRETE RODRIGUEZ
## 5 CARLOS GONZALEZ GONZALEZ
## 6 ANDREA CAMPOS PIZARRO
## 7 FABIOLA ROBLES PIZARRO
## 8 PATY GONZALEZ CAMPOS
## 9 ALEJANDRO JUAREZ RUIZ
## 10 FERNANDO MEDINA CAMPOSgeneraNombres <- 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
}personas <- generaNombres(nombres, apellidos, 100)
personas## Nombre Apellido.P Apellido.M
## 1 LUISA RODRIGUEZ RUIZ
## 2 PATY CARRETE ROBLES
## 3 RUBEN GONZALEZ CAMPOS
## 4 ROGELIO GONZALEZ GONZALEZ
## 5 ALEJANDRO RUIZ GONZALEZ
## 6 MARIA CAMPOS GOMEZ
## 7 ROGELIO JUAREZ RODRIGUEZ
## 8 RUBEN MEDINA ROBLES
## 9 PATY RUIZ GONZALEZ
## 10 PATY MEDINA CAMPOS
## 11 PATY CARRETE MEDINA
## 12 FERNANDO RUIZ CARRETE
## 13 CARLOS ROBLES RODRIGUEZ
## 14 ANDREA GONZALEZ CARRETE
## 15 ROGELIO RUIZ CARRETE
## 16 LUISA JUAREZ GOMEZ
## 17 FABIOLA RUIZ ROBLES
## 18 RUBEN CARRETE JUAREZ
## 19 ROGELIO PIZARRO RUIZ
## 20 ALEJANDRO CAMPOS ROBLES
## 21 MARIA PIZARRO ROBLES
## 22 ANDREA RUIZ GONZALEZ
## 23 ROGELIO PIZARRO GOMEZ
## 24 MARIA ROBLES MEDINA
## 25 MARIA GONZALEZ JUAREZ
## 26 MARIA CARRETE ROBLES
## 27 CARLOS GONZALEZ MEDINA
## 28 ALEJANDRO CARRETE RODRIGUEZ
## 29 FERNANDO RUIZ GOMEZ
## 30 MARIA CARRETE RUIZ
## 31 ANDREA ROBLES JUAREZ
## 32 ANDREA JUAREZ RODRIGUEZ
## 33 FERNANDO RODRIGUEZ RUIZ
## 34 FABIOLA GOMEZ CARRETE
## 35 RUBEN RODRIGUEZ GOMEZ
## 36 FERNANDO CAMPOS GONZALEZ
## 37 ALEJANDRO RODRIGUEZ CARRETE
## 38 FABIOLA GONZALEZ ROBLES
## 39 MARIA GONZALEZ ROBLES
## 40 PATY CAMPOS JUAREZ
## 41 RUBEN PIZARRO CARRETE
## 42 FABIOLA JUAREZ MEDINA
## 43 CARLOS RODRIGUEZ GONZALEZ
## 44 PATY RUIZ RUIZ
## 45 LUISA PIZARRO ROBLES
## 46 FABIOLA CARRETE GONZALEZ
## 47 CARLOS RUIZ GOMEZ
## 48 FERNANDO MEDINA GOMEZ
## 49 PATY JUAREZ GONZALEZ
## 50 ALEJANDRO GOMEZ CAMPOS
## 51 ANDREA CAMPOS CARRETE
## 52 FERNANDO GONZALEZ PIZARRO
## 53 CARLOS GOMEZ CAMPOS
## 54 RUBEN PIZARRO CAMPOS
## 55 LUISA MEDINA CAMPOS
## 56 RUBEN RUIZ ROBLES
## 57 CARLOS MEDINA CARRETE
## 58 PATY CAMPOS RUIZ
## 59 PATY PIZARRO RUIZ
## 60 LUISA PIZARRO MEDINA
## 61 LUISA ROBLES MEDINA
## 62 MARIA CARRETE RODRIGUEZ
## 63 CARLOS PIZARRO ROBLES
## 64 LUISA GOMEZ JUAREZ
## 65 ROGELIO MEDINA RODRIGUEZ
## 66 FERNANDO RUIZ RUIZ
## 67 ANDREA CAMPOS GONZALEZ
## 68 MARIA RUIZ GONZALEZ
## 69 CARLOS JUAREZ PIZARRO
## 70 LUISA RUIZ RUIZ
## 71 FABIOLA RODRIGUEZ RODRIGUEZ
## 72 LUISA JUAREZ CARRETE
## 73 RUBEN ROBLES RUIZ
## 74 LUISA MEDINA MEDINA
## 75 RUBEN GONZALEZ CARRETE
## 76 MARIA ROBLES JUAREZ
## 77 CARLOS RUIZ JUAREZ
## 78 ANDREA ROBLES PIZARRO
## 79 MARIA ROBLES MEDINA
## 80 LUISA JUAREZ CAMPOS
## 81 ALEJANDRO JUAREZ RUIZ
## 82 ROGELIO ROBLES GONZALEZ
## 83 CARLOS MEDINA ROBLES
## 84 ANDREA GOMEZ RUIZ
## 85 MARIA GONZALEZ MEDINA
## 86 PATY RODRIGUEZ CARRETE
## 87 RUBEN GONZALEZ ROBLES
## 88 ALEJANDRO CARRETE CARRETE
## 89 ROGELIO ROBLES PIZARRO
## 90 ANDREA ROBLES ROBLES
## 91 PATY RODRIGUEZ ROBLES
## 92 LUISA CAMPOS ROBLES
## 93 ALEJANDRO CAMPOS GONZALEZ
## 94 LUISA RODRIGUEZ RODRIGUEZ
## 95 PATY GONZALEZ GONZALEZ
## 96 LUISA PIZARRO MEDINA
## 97 MARIA GOMEZ RUIZ
## 98 ANDREA GONZALEZ PIZARRO
## 99 ANDREA JUAREZ CAMPOS
## 100 PATY MEDINA CARRETEDe un conjunto de 10 datos y con variables nombre y apellido se generó de manera aleatoria un data frame de 1000 nombres completos; mostrando el despliege de la muestra de 100 elementos.