R syntax for REITS