updateR function

Function to update site level clustering in the BAREB model