Create Methods of creating empty vector in R.r