VRS7R DEMO by R Scripts