R/makeUniqueCasesIndividualized.R

Defines functions makeUniqueCasesIndividualized

Documented in makeUniqueCasesIndividualized

#' Make each element of a  redundant vector individualized
#' 
#' @param vec A vector of unique cases
#' @return A vector where each element of inputed vec is individualized by adding ".iteration" to the end of element
#' @author Alexander Kheirallaha ([email protected])
#' @export 

makeUniqueCasesIndividualized <- function(vec){
  for(i in 1:length(vec)){
    vec[i] <- paste(vec[i], ".", as.character(i), sep = "")
  }
  return(vec)
}
msxakk89/dat documentation built on March 25, 2020, 3:18 p.m.