Create rotsf-demo.r