r - R 绘制逻辑回归的经验概率

Question

我正在尝试绘制逻辑回归的经验概率。我的数据是学生的作业分数范围从 0 到 20。响应是他们是否通过了期末考试，1 表示通过，0 表示不及格。

我想从我的数据中知道，作业中获得18-20、16-18等的学生期末考试的通过率是多少？

我假设我可以通过几个循环来实现这一点，但看起来很复杂。有谁知道更简单的方法？提前致谢。