使用R查找在物流回归中成功的概率

Question

我正在使用R在数据集中运行逻辑回归。 下面是示例代码：

classifier=glm(formula = Output~.,family =  inomial,data=df_train,maxit = 100)
prob_pred=predict(classifier,type = 'response',newdata = df_tes[-5])
y_pred = ifelse(prob_pred>0.4,1,0)

Output是我的目标变量。这是一个二项式分类问题。 Success和Fail是两个因素。

但是在这里，我希望我的o / p为Success的概率。我希望在每条记录中找到成功的概率值（例如：68％，45％，36％等）

我是R编程的新手，任何人都可以帮助我。

如果已经在任何地方都提出了这个问题，请给我链接。