df <- data.frame(c("Administración de Negocios Internacionales",
"Ingeniería de Telecomunicaciones",
"Ingeniería Geográfica",
"Psicología Organizacional y de la Gestión Humana",
"Educación Secundaria Especialidad Lengua y Literatura",
"Educación Secundaria, Mención en: Ciencias Matemáticas",
"Ciencias de la Comunicación con Especialidad en Periodismo",
"Ingeniería Pesquera",
"Medicina Humana",
"Medicina Veterinaria",
"Carrera de Economía",
"Radiología",
"Biología - Microbiología",
"Marketing y Negocios Internacionales",
"Tecnología Médica con Especialidad en Laboratorio Clínico"))
colnames(df) <- "ProgramaEducativo"
cine(df=df, EducationProgram="ProgramaEducativo", filterBy='PRF')
Run the code above in your browser using DataLab