How to append a value to a vector in R?