updated graphics, RScripts