SMS versenden: Analysis of the surplus in the collective risk model using R