R Programming Change Values in Vector