R , Storey ,dist