################################################################# 
# THIS FILE CONTAINS THE CODE TO GENERATE THE FIGURE 1 SHOWN IN #
# THE PAPER:                                                    #
# Torgo,L and Lopes,E.: Utility-based Fraud Detection. In       #
#   Proceedings of the 22nd IJCAI'2011                          #
#################################################################
# Author : Luis Torgo (ltorgo@dcc.fc.up.pt)      Date: Mar 2011 #
# License: GPL (>= 2)                                           #
#################################################################




require(DMwR)


########################################
## Figure 1: The artificial data set
########################################

pdf('figArtDS.pdf',family='Times', width=6,height=6)
load('artifData.Rdata')
plot(data,xlab='x1',ylab='x2',main='The generated data set')
text(700,180,'Cluster 1 (marked outliers)\n- Low inspection costs\n- Low rewards',pos=4)
arrows(670,180,200,70)
text(0,1000,'Cluster 2 (less marked outliers)\n- High inspection costs\n- High rewards',pos=4)
arrows(500,1000,700,990)
dev.off()