r histiory