Plotting Multiple Plots in PDF using a For-Loop

Question

I struggle to create Likert-plots using for-loop.s

I use this code to create a likert plot (with results[[x]] <- likert(questions[[x]]))