我按照我上面的标题找了两个小时都没有找到答案
直到看到下面的这个r语言的论坛上，有一个人讲了一句话启发到了我
https://d.cosx.org/d/8652-8652
低层作图函数如lines(), points()等会向已有图形中添加元素，高层作图函数如plot(), boxplot(), hist()等会生成新的图形，这种情况下只能拆分作图区域，用par()中的mfrow或者mfcol参数，或者用更灵活的layout()。
也就是说，如果想要画在一起的话，画线的方式就需要做修改了。
先画直方图，再画线
hist(怕黑的爆米花[,1], xlim = c(0, MAX_Time), breaks = seq(0, MAX_Time+div_len, by=div_len), lty=1, main="")lines(x,y, type='l') 后记希望能帮到大家，如果有赞赏就更好啦 hhh