schedule <- data.frame(
INSTRUCTOR = c("Lee", "Smith", "Jones", "Dawson", "Garcia"),
SUBJ = c("MATH", "NURS", "CSCI", "ENGL", "COMM"),
COLLEGE = c("Science", "Nursing", "Science", "Arts and Sciences", "Arts and Communication"),
DEPARTMENT = c("Math", "Nursing", "CS", "English", "Comm Studies"),
PROGRAM = c("BS", "BSN", "BS", "BA", "BA"),
stringsAsFactors = FALSE
)
filter_schedule(schedule, subject_pattern = "^MATH|^STAT")
filter_schedule(schedule, instructor_pattern = "smith")
filter_schedule(schedule, college_pattern = "Science")
filter_schedule(schedule, department_pattern = "Comm")
filter_schedule(schedule, program_pattern = "^BA$")
Run the code above in your browser using DataLab