updated r presentation