updated R plot printer