This function uses ggplot to produce a themed Receiver Operator Curve and calculates a Gini coefficient based on it.
giniChart(pred, act)
Logit/scores/probabilities to be compared against actuals
This should be a column containing outcomes in a boolean form either as a factor or number
AUC roc giniCoef
AUC
roc
giniCoef
Other creditrisk: giniCoef, logit.odd, logit.prob, odd.logit, odd.prob, prob.logit, prob.odd, scaledScore
logit.odd
logit.prob
odd.logit
odd.prob
prob.logit
prob.odd
scaledScore
# NOT RUN { sampledata<- data.frame(val= rnorm(100) , outcome=rbinom(100,1,.8)) giniChart(sampledata$val,sampledata$outcome) # }
Run the code above in your browser using DataLab