added R examples