Invia SMS: GLM and critical sickness with R language support