{"word_count": 121, "character_count": 995}
Pour illustrer un peu le cours d'actuariat de l'assurance dommage, un petit exemple de ce que peut être une base de sinistres (je serais ravi d'en avoir que je puisse partager avec les étudiants, dans le cours).Regardons par exemple un sinistre,&#62; XOn a les dates des opérations, avec des paiements et/ou des réestimations de la charge dossier/dossier. Pour visualiser la vie de ce sinistre, on peut utiliser&#62; D=as.Date(X[,2],"%d/%m/%Y")&#62; plot(D,X[,7]+cumsum((X[,3])),type="l")&#62; lines(D,cumsum((X[,3])),col="red")Le sinistre est survenu en 2007. Quand on va constituer le triangle, les montants suivants vont être affecté à la ligne correspondant à l'année de survenance 2007,&#62; X$year=as.POSIXlt(D)$year+1900&#62; aggregate(X[,3],by=list(X$year),+ function(x) sum(x,na.rm=TRUE))  Group.1         x1    1997    77.5972    1998  9568.3273    1999  1398.0744    2000 16266.7605    2001 21955.1756    2002   106.800correspondant aux incréments observés sur le graphique ci-dessus.