我有以下数据集，我为以下数据集创建了逻辑回归模型：https://github.com/Iron-Maiden-19/DS705-Week-1-Assignment-/blob/master/acetic_out.csv数据集中的变量是口味，乙酸和人。品味是具有“可接受”或“不可接受”的因素变量，人的值为“儿童”和“成人”。我的模型如下，然后建立概率：
cheese_out <- glm(taste~acetic+person,data=cheese,family = "binomial")
probabilities <- predict(cheese_out,newdata=cheese, type="response")
因此，当乙酸值为6时，我需要计算儿童发现奶酪的味道可接受的预测概率。我该怎么做？我是否需要将6和child插入数据集中并根据阈值进行计算？如何将'child'和6插入预测代码以计算概率？