为什么ggplot没有在R中绘制多个窗口？

I am having a problem with a couple R functions I wrote. I have 2 plotting functions and I want to write a function that creates plots for both of the functions. This function looks like thisI am having a problem with a couple R functions