Create Vectors and operations in R