Updated demo-10.R for PivotalR