r-code to be shared