update r hist