Objetivo: Función que genera nombres completos
Creando los dos vectores
Nombres <- c("Juan","Mary","Rubén","Paty","Jorge","Luis","Olga","Verónica","Mimí","Karina")
Apellidos <- c("Lopez","Perez","Holguin","Fernandez","Garcia","Andrade","Ortega","Rios","Vergara","Gonzalez")
Nombres
## [1] "Juan" "Mary" "Rubén" "Paty" "Jorge" "Luis"
## [7] "Olga" "Verónica" "Mimí" "Karina"
Apellidos
## [1] "Lopez" "Perez" "Holguin" "Fernandez" "Garcia"
## [6] "Andrade" "Ortega" "Rios" "Vergara" "Gonzalez"
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 Mary Gonzalez Holguin
## 2 Rubén Vergara Gonzalez
## 3 Paty Gonzalez Perez
## 4 Rubén Perez Perez
## 5 Luis Lopez Perez
## 6 Mimí Vergara Ortega
## 7 Verónica Vergara Gonzalez
## 8 Rubén Ortega Fernandez
## 9 Mimí Lopez Vergara
## 10 Mimí Garcia Holguin
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 Verónica Gonzalez Ortega
## 2 Paty Andrade Gonzalez
## 3 Luis Andrade Andrade
## 4 Karina Garcia Fernandez
## 5 Paty Andrade Andrade
## 6 Olga Ortega Ortega
## 7 Olga Perez Fernandez
## 8 Juan Ortega Andrade
## 9 Rubén Lopez Garcia
## 10 Rubén Rios Holguin
## 11 Karina Ortega Andrade
## 12 Paty Lopez Vergara
## 13 Mary Andrade Vergara
## 14 Jorge Rios Holguin
## 15 Paty Vergara Gonzalez
## 16 Rubén Ortega Gonzalez
## 17 Mary Holguin Fernandez
## 18 Paty Ortega Andrade
## 19 Juan Ortega Garcia
## 20 Verónica Garcia Lopez
## 21 Mary Perez Andrade
## 22 Luis Gonzalez Holguin
## 23 Juan Holguin Garcia
## 24 Karina Fernandez Ortega
## 25 Verónica Rios Garcia
## 26 Luis Garcia Vergara
## 27 Jorge Perez Gonzalez
## 28 Mary Perez Holguin
## 29 Karina Perez Perez
## 30 Verónica Rios Fernandez
## 31 Rubén Andrade Rios
## 32 Mary Holguin Holguin
## 33 Verónica Lopez Vergara
## 34 Olga Vergara Andrade
## 35 Mimí Gonzalez Ortega
## 36 Verónica Vergara Garcia
## 37 Paty Lopez Lopez
## 38 Verónica Rios Andrade
## 39 Olga Ortega Vergara
## 40 Olga Lopez Gonzalez
## 41 Karina Lopez Holguin
## 42 Karina Holguin Rios
## 43 Luis Garcia Lopez
## 44 Mary Vergara Rios
## 45 Jorge Vergara Ortega
## 46 Paty Gonzalez Rios
## 47 Jorge Holguin Fernandez
## 48 Paty Holguin Garcia
## 49 Luis Andrade Fernandez
## 50 Paty Fernandez Vergara
## 51 Rubén Holguin Fernandez
## 52 Juan Vergara Holguin
## 53 Verónica Garcia Gonzalez
## 54 Verónica Vergara Garcia
## 55 Karina Holguin Rios
## 56 Mary Garcia Vergara
## 57 Olga Rios Garcia
## 58 Juan Andrade Ortega
## 59 Luis Fernandez Holguin
## 60 Luis Fernandez Gonzalez
## 61 Olga Perez Holguin
## 62 Mimí Ortega Gonzalez
## 63 Juan Fernandez Vergara
## 64 Luis Rios Ortega
## 65 Juan Ortega Ortega
## 66 Mary Vergara Gonzalez
## 67 Paty Ortega Perez
## 68 Luis Andrade Perez
## 69 Paty Fernandez Andrade
## 70 Paty Rios Gonzalez
## 71 Rubén Garcia Ortega
## 72 Olga Vergara Gonzalez
## 73 Paty Ortega Rios
## 74 Rubén Rios Andrade
## 75 Mary Fernandez Ortega
## 76 Paty Gonzalez Perez
## 77 Olga Garcia Holguin
## 78 Mary Fernandez Vergara
## 79 Rubén Gonzalez Holguin
## 80 Olga Vergara Garcia
## 81 Jorge Ortega Andrade
## 82 Olga Gonzalez Perez
## 83 Luis Perez Garcia
## 84 Verónica Lopez Garcia
## 85 Juan Garcia Fernandez
## 86 Luis Holguin Garcia
## 87 Paty Perez Fernandez
## 88 Mimí Ortega Ortega
## 89 Mary Rios Holguin
## 90 Jorge Ortega Ortega
## 91 Mimí Rios Perez
## 92 Mary Holguin Vergara
## 93 Karina Garcia Garcia
## 94 Verónica Holguin Andrade
## 95 Jorge Perez Rios
## 96 Verónica Lopez Rios
## 97 Juan Garcia Fernandez
## 98 Karina Vergara Rios
## 99 Rubén Gonzalez Garcia
## 100 Juan Vergara Holguin
En esta practica se aprendio a generar una funcion que nos genera una lista de N nombres completos a
partir de 2 vectores (nombre y apellido)
La funcion es llamada mediante la asignacion a una variable