i used portuguese bank data for machine learning application.
bk=read.csv("bank.csv", sep = ";")
library(ggplot2)
library(plotly)
gbk1 = ggplot(bk, aes(x=y, y=duration, fill=y)) + geom_boxplot()
gbk1 = gbk1 + ggtitle("Box plot la durée des appel en fonction de la reponse final") + xlab("réponse") + ylab("durée des appel")
gbk1
ggplotly(gbk1)