> head(sweet)
  interval  urgency success
1     3138      761       1
2     3210     2189       1
3     3243     1256       1
4     8776      823       1
5     3094     1405       1
6     3137     1062       1

ggplot(sweet, aes(x=urgency, fill=success==0)) + geom_histogram(position='fill')

ggplot(sweet, aes(x=urgency, y=interval, fill=success==0)) + geom_bin2d()

ggplot(sweet, aes(interval, urgency, z = success)) + stat_summary2d()