Plot graph inside for loop in r