Add R plot