`learning-by-doing` code snippets in r