Replaced unnecessary with subset in plots.r