R coursework