Create plo2.r