update r example