how to make a plot from table that i made

Question

f1 <- c(AppliedSci[1, 27], AppliedSci[1, 28], AppliedSci[1, 29], AppliedSci[1, 30])
f2 <- c(Arts[1, 27], Arts[1, 28], Arts[1, 29], Arts[1, 30])
f3 <- c(Busi