Objetivo: Función que genera nombres completos
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 RUIZ RODRIGUEZ
## 2 LUISA PIZARRO RODRIGUEZ
## 3 ALEJANDRO CAMPOS CARRETE
## 4 MARIA CARRETE CARRETE
## 5 CARLOS PIZARRO GOMEZ
## 6 LUISA GONZALEZ RODRIGUEZ
## 7 RUBEN GONZALEZ CARRETE
## 8 LUISA GONZALEZ JUAREZ
## 9 PATY GOMEZ GOMEZ
## 10 MARIA CARRETE 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 CARLOS GONZALEZ RUIZ
## 2 FABIOLA ROBLES CAMPOS
## 3 FABIOLA MEDINA MEDINA
## 4 ALEJANDRO GOMEZ JUAREZ
## 5 FERNANDO ROBLES GOMEZ
## 6 ROGELIO PIZARRO MEDINA
## 7 ROGELIO GONZALEZ GOMEZ
## 8 CARLOS GONZALEZ RODRIGUEZ
## 9 LUISA CARRETE JUAREZ
## 10 ALEJANDRO MEDINA MEDINA
## 11 RUBEN CAMPOS MEDINA
## 12 RUBEN MEDINA MEDINA
## 13 FERNANDO PIZARRO RUIZ
## 14 MARIA MEDINA PIZARRO
## 15 LUISA CAMPOS JUAREZ
## 16 RUBEN JUAREZ ROBLES
## 17 ALEJANDRO CARRETE JUAREZ
## 18 MARIA CARRETE ROBLES
## 19 ROGELIO GOMEZ GOMEZ
## 20 PATY RUIZ CARRETE
## 21 ANDREA CAMPOS JUAREZ
## 22 ROGELIO GONZALEZ PIZARRO
## 23 FABIOLA RODRIGUEZ GONZALEZ
## 24 ROGELIO CARRETE ROBLES
## 25 CARLOS CAMPOS JUAREZ
## 26 LUISA MEDINA GOMEZ
## 27 FERNANDO RUIZ RODRIGUEZ
## 28 ANDREA CAMPOS JUAREZ
## 29 ALEJANDRO RODRIGUEZ JUAREZ
## 30 PATY GONZALEZ MEDINA
## 31 ALEJANDRO RODRIGUEZ JUAREZ
## 32 CARLOS GOMEZ GOMEZ
## 33 ROGELIO RUIZ GONZALEZ
## 34 ANDREA GOMEZ ROBLES
## 35 RUBEN RODRIGUEZ CARRETE
## 36 FABIOLA ROBLES JUAREZ
## 37 RUBEN GOMEZ MEDINA
## 38 PATY MEDINA MEDINA
## 39 LUISA ROBLES MEDINA
## 40 FERNANDO RUIZ ROBLES
## 41 RUBEN RUIZ GOMEZ
## 42 PATY ROBLES PIZARRO
## 43 FABIOLA GONZALEZ GOMEZ
## 44 ANDREA ROBLES RODRIGUEZ
## 45 ANDREA CAMPOS MEDINA
## 46 PATY CAMPOS ROBLES
## 47 ROGELIO RUIZ PIZARRO
## 48 CARLOS ROBLES RODRIGUEZ
## 49 FABIOLA CARRETE MEDINA
## 50 FABIOLA MEDINA RUIZ
## 51 ALEJANDRO RUIZ CAMPOS
## 52 PATY CARRETE RODRIGUEZ
## 53 ANDREA PIZARRO CAMPOS
## 54 ANDREA GONZALEZ ROBLES
## 55 FABIOLA CAMPOS JUAREZ
## 56 ALEJANDRO PIZARRO GOMEZ
## 57 FABIOLA ROBLES PIZARRO
## 58 ALEJANDRO CAMPOS RUIZ
## 59 PATY GOMEZ ROBLES
## 60 FERNANDO JUAREZ GOMEZ
## 61 FABIOLA RODRIGUEZ CAMPOS
## 62 RUBEN GOMEZ MEDINA
## 63 MARIA ROBLES MEDINA
## 64 ALEJANDRO JUAREZ GOMEZ
## 65 FERNANDO CARRETE MEDINA
## 66 PATY CAMPOS GOMEZ
## 67 ROGELIO JUAREZ GOMEZ
## 68 ANDREA RODRIGUEZ GONZALEZ
## 69 ROGELIO CARRETE PIZARRO
## 70 ALEJANDRO RUIZ CARRETE
## 71 PATY RUIZ CARRETE
## 72 RUBEN RUIZ GOMEZ
## 73 ROGELIO MEDINA ROBLES
## 74 ALEJANDRO JUAREZ MEDINA
## 75 ANDREA RODRIGUEZ ROBLES
## 76 CARLOS MEDINA RODRIGUEZ
## 77 LUISA RUIZ CAMPOS
## 78 ROGELIO GOMEZ MEDINA
## 79 ALEJANDRO GOMEZ RODRIGUEZ
## 80 RUBEN GOMEZ MEDINA
## 81 FABIOLA JUAREZ GONZALEZ
## 82 ANDREA PIZARRO PIZARRO
## 83 CARLOS RODRIGUEZ GONZALEZ
## 84 MARIA PIZARRO MEDINA
## 85 PATY CARRETE JUAREZ
## 86 FERNANDO PIZARRO CARRETE
## 87 MARIA ROBLES CAMPOS
## 88 CARLOS PIZARRO PIZARRO
## 89 RUBEN JUAREZ CARRETE
## 90 LUISA CAMPOS MEDINA
## 91 ALEJANDRO RUIZ CAMPOS
## 92 FABIOLA PIZARRO PIZARRO
## 93 MARIA ROBLES GONZALEZ
## 94 MARIA CAMPOS CARRETE
## 95 FERNANDO ROBLES CAMPOS
## 96 ANDREA GONZALEZ CAMPOS
## 97 ALEJANDRO CAMPOS GOMEZ
## 98 ANDREA CARRETE PIZARRO
## 99 FABIOLA JUAREZ GONZALEZ
## 100 ALEJANDRO JUAREZ PIZARRO
Analisis de los Datos
En esta practica se generan aleatoriamente nombres de personas en donde primero se generan
10 nombres y posteriormente 100 con apeido paterno y materno.