Αποστολή με SMS: Bayesian Networks in R