http://rpubs.com/Brayan_Milla/530256
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")
edu=c("secundaria" ,"bachiller", "bachiller", "bachiller", "bachiller" , "bachiller" , "magister","bachiller" , "bachiller")
grupo=data.frame(nombre, partido,edad,tafiliacion,sexo,edu,
stringsAsFactors = F)
grupo## nombre partido edad tafiliacion sexo edu
## 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 bachillerEl mayor de grupo es:
grupo[grupo$edad==max(grupo$edad),]## nombre partido edad tafiliacion sexo edu
## 1 Juan Mundo Colorado 45 11 M secundariaEl sexo del menor del grupo es:
grupo[grupo$edad==min(grupo$edad),'sexo']## [1] "F"El partido de Fresia es:
grupo[grupo$nombre=='Fresia','partido']## [1] "Los Verdes"El nivel educativo y nombre de la persona con mas años de afiliacion:
grupo[grupo$tafiliacion==max(grupo$tafiliacion),c('nombre','edu')]## nombre edu
## 8 Teresa bachillerEl nombre de las mujeres del partido Los Verdes:
grupo[grupo$partido=='Los Verdes' & grupo$sexo=='F',c('nombre')]## [1] "Rocio" "Fresia" "Teresa"La edad y nombre de la persona con mayor tiempo de afiliacion en el partido Los Verdes.
grupo[grupo$tafiliacion==max(grupo$tafiliacion[grupo$partido=='Los Verdes']),c('nombre','edad')]## nombre edad
## 8 Teresa 35