PRACTICA

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[grupo$edad==max(grupo$edad),  "edad"]

[1] 45