Res3 DEMO by R Scripts