# CG Q$6$a # Customer $10$ in our dataset did not end up subscribing to the term deposit.

########## Let's use our fitted model to see what it would have predicted for this customer.

########## First, create an object called "new" that that you will pass to the predict$()$

########## function in the newdata argument.

new $<-$ data.frame$($tlmrk$[10])$

# CG Q$6$b # Use your fitted logistic regression and your "newdata" in the predict$()$

########## function to make a prediction of the probability the customer would subscribe.

predict$($tlmrk$,$ new, type$=$"response"$)$