工作类型和收取的曲线图

barplot(Int.l.P_churn,col = cols, beside = TRUE)
title(main = an, xlab = "calss", ylab =an)
Int.l.P_churn_ratio=round(prop.table(Int.l.P_churn,margin=2),4)*100
Int.l.P_churn_ratio
cols <- terrain.colors(3)barplot(Int.l.P_churn_ratio,col = cols, beside = TRUE)
title(main =an, xlab = "calss", ylab = an)

数据类型的基本内容为