added small example for data analysis with r