nombre=c("Juan", "Rocio", "Manuel", "Pedro",
"Carla", "Fresia", "Alfredo", "Teresa", "Maria")
Partido=c("Mundo Colorado", "Los verdes", "Los tibios", "Mundo Colorado",
"Los tibios", "Los verdes","Los verdes", "Los verdes", "Los tibios")
edad=c(45,42,34,41,25,24,30,35,37)
Tafiliacion=c(11,3,2,9,3,2,2,12,7)
Sexo=c("M", "F", "M", "M",
"F", "F", "M", "F", "F")
nivelEdu=c("secundaria", "bachiller", "bachiller", "bachiller",
"bachiller", "bachiller", "magister", "bachiller", "bachiller")
SimpatizantesPartido=data.frame(nombre,
Partido,
edad,
Tafiliacion,
Sexo,
nivelEdu,
stringsAsFactors = F)
SimpatizantesPartido
## nombre Partido edad Tafiliacion Sexo nivelEdu
## 1 Juan Mundo Colorado 45 11 M secundaria
## 2 Rocio Los verdes 42 3 F bachiller
## 3 Manuel Los tibios 34 2 M bachiller
## 4 Pedro Mundo Colorado 41 9 M bachiller
## 5 Carla Los tibios 25 3 F bachiller
## 6 Fresia Los verdes 24 2 F bachiller
## 7 Alfredo Los verdes 30 2 M magister
## 8 Teresa Los verdes 35 12 F bachiller
## 9 Maria Los tibios 37 7 F bachiller
SimpatizantesPartido[SimpatizantesPartido$edad==max(SimpatizantesPartido$edad), "nombre"]
## [1] "Juan"
SimpatizantesPartido[SimpatizantesPartido$edad==min(SimpatizantesPartido$edad), "Sexo"]
## [1] "F"
SimpatizantesPartido[SimpatizantesPartido$nombre=='Fresia',"Partido"]
## [1] "Los verdes"
SimpatizantesPartido[SimpatizantesPartido$Tafiliacion==max(SimpatizantesPartido$Tafiliacion) ,c("nombre", "nivelEdu")]
## nombre nivelEdu
## 8 Teresa bachiller
SimpatizantesPartido[SimpatizantesPartido$Partido=="Los verdes" & SimpatizantesPartido$Sexo=="F",c("nombre")]
## [1] "Rocio" "Fresia" "Teresa"
SimpatizantesPartido[SimpatizantesPartido$Tafiliacion==max(SimpatizantesPartido$Tafiliacion[SimpatizantesPartido$Partido=='Los verdes']),c('nombre','edad')]
## nombre edad
## 8 Teresa 35