Objetivo: Funcion que Genera Nombres Completos
crear Nombres completos
Generando dos Vectores
nombres <- c('RUBEN','CARLOS','PATY','ALEJANDRO','LUISA','ROGELIO','ANDREA','FABIOLA',
'MARIA','FERNANDO')
apellidos <- c('GONZALEZ','MEDINA','ROBLE','JUAREZ','RUIZ','PIZARRO','RODRIGUEZ','CARRETE',
'CAMPOS','GOMEZ')
nombres
## [1] "RUBEN" "CARLOS" "PATY" "ALEJANDRO" "LUISA"
## [6] "ROGELIO" "ANDREA" "FABIOLA" "MARIA" "FERNANDO"
apellidos
## [1] "GONZALEZ" "MEDINA" "ROBLE" "JUAREZ" "RUIZ"
## [6] "PIZARRO" "RODRIGUEZ" "CARRETE" "CAMPOS" "GOMEZ"
Generando mil nombre 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 CARRETE RODRIGUEZ
## 2 ALEJANDRO RUIZ CARRETE
## 3 RUBEN JUAREZ CARRETE
## 4 RUBEN CARRETE RUIZ
## 5 ALEJANDRO CAMPOS JUAREZ
## 6 ALEJANDRO RODRIGUEZ RUIZ
## 7 FERNANDO CARRETE RUIZ
## 8 CARLOS JUAREZ CAMPOS
## 9 ALEJANDRO ROBLE MEDINA
## 10 ANDREA PIZARRO ROBLE
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 CARRETE JUAREZ
## 2 RUBEN ROBLE GONZALEZ
## 3 LUISA CAMPOS GONZALEZ
## 4 ALEJANDRO GOMEZ ROBLE
## 5 PATY GOMEZ PIZARRO
## 6 FABIOLA RUIZ CAMPOS
## 7 FABIOLA MEDINA ROBLE
## 8 FABIOLA CAMPOS JUAREZ
## 9 FERNANDO JUAREZ ROBLE
## 10 ROGELIO ROBLE ROBLE
## 11 RUBEN CAMPOS GOMEZ
## 12 ROGELIO RUIZ CARRETE
## 13 FERNANDO CAMPOS ROBLE
## 14 ALEJANDRO CARRETE RODRIGUEZ
## 15 MARIA MEDINA MEDINA
## 16 PATY PIZARRO CAMPOS
## 17 FABIOLA ROBLE GOMEZ
## 18 FABIOLA RODRIGUEZ RODRIGUEZ
## 19 ALEJANDRO JUAREZ CAMPOS
## 20 FABIOLA GONZALEZ ROBLE
## 21 RUBEN MEDINA GONZALEZ
## 22 MARIA RUIZ JUAREZ
## 23 ROGELIO MEDINA RUIZ
## 24 FABIOLA RODRIGUEZ JUAREZ
## 25 LUISA RODRIGUEZ RUIZ
## 26 MARIA CARRETE MEDINA
## 27 ALEJANDRO GONZALEZ GONZALEZ
## 28 ANDREA PIZARRO GONZALEZ
## 29 ALEJANDRO GONZALEZ JUAREZ
## 30 RUBEN GOMEZ JUAREZ
## 31 LUISA GONZALEZ MEDINA
## 32 FABIOLA GONZALEZ ROBLE
## 33 FABIOLA CAMPOS PIZARRO
## 34 MARIA MEDINA JUAREZ
## 35 FABIOLA GOMEZ ROBLE
## 36 ROGELIO ROBLE GOMEZ
## 37 ROGELIO JUAREZ PIZARRO
## 38 PATY RODRIGUEZ GONZALEZ
## 39 ALEJANDRO CARRETE GONZALEZ
## 40 MARIA GONZALEZ ROBLE
## 41 RUBEN RODRIGUEZ JUAREZ
## 42 RUBEN GOMEZ ROBLE
## 43 CARLOS RUIZ CAMPOS
## 44 PATY MEDINA JUAREZ
## 45 FABIOLA RODRIGUEZ MEDINA
## 46 CARLOS CAMPOS GONZALEZ
## 47 MARIA ROBLE PIZARRO
## 48 PATY GOMEZ GOMEZ
## 49 ROGELIO GONZALEZ PIZARRO
## 50 CARLOS MEDINA RODRIGUEZ
## 51 FABIOLA MEDINA ROBLE
## 52 ANDREA PIZARRO RUIZ
## 53 LUISA JUAREZ JUAREZ
## 54 RUBEN CARRETE JUAREZ
## 55 LUISA PIZARRO JUAREZ
## 56 FABIOLA GONZALEZ CAMPOS
## 57 CARLOS ROBLE CARRETE
## 58 ALEJANDRO MEDINA MEDINA
## 59 ROGELIO CAMPOS ROBLE
## 60 ANDREA CARRETE ROBLE
## 61 FERNANDO RUIZ ROBLE
## 62 ALEJANDRO RUIZ MEDINA
## 63 ROGELIO CARRETE CARRETE
## 64 ANDREA MEDINA CAMPOS
## 65 ALEJANDRO ROBLE RODRIGUEZ
## 66 FABIOLA JUAREZ GOMEZ
## 67 FERNANDO RODRIGUEZ MEDINA
## 68 ALEJANDRO PIZARRO CARRETE
## 69 ANDREA RUIZ PIZARRO
## 70 ROGELIO RUIZ JUAREZ
## 71 MARIA CAMPOS RODRIGUEZ
## 72 FERNANDO RODRIGUEZ GONZALEZ
## 73 MARIA ROBLE ROBLE
## 74 ROGELIO RODRIGUEZ RUIZ
## 75 CARLOS GOMEZ RODRIGUEZ
## 76 MARIA CAMPOS JUAREZ
## 77 ALEJANDRO CARRETE PIZARRO
## 78 FABIOLA ROBLE GONZALEZ
## 79 FERNANDO JUAREZ MEDINA
## 80 MARIA GONZALEZ RODRIGUEZ
## 81 PATY CARRETE ROBLE
## 82 ANDREA CARRETE RODRIGUEZ
## 83 CARLOS CARRETE CAMPOS
## 84 MARIA RUIZ MEDINA
## 85 FERNANDO JUAREZ GONZALEZ
## 86 PATY CAMPOS GOMEZ
## 87 ROGELIO ROBLE GOMEZ
## 88 PATY MEDINA ROBLE
## 89 MARIA GONZALEZ RUIZ
## 90 PATY CARRETE MEDINA
## 91 FERNANDO GOMEZ RODRIGUEZ
## 92 MARIA PIZARRO PIZARRO
## 93 RUBEN MEDINA ROBLE
## 94 ANDREA CAMPOS CAMPOS
## 95 MARIA JUAREZ RUIZ
## 96 MARIA RUIZ MEDINA
## 97 PATY RUIZ GONZALEZ
## 98 LUISA JUAREZ JUAREZ
## 99 ROGELIO MEDINA GOMEZ
## 100 PATY ROBLE GONZALEZ
Interpretacion
en esta practica creamos por medio de una funcion 100 nombres completos en forma aleatoria, teniendo como datos fuente dos vectores, uno con 10 nombres y otro con 10 apellidos