#numerical
v <- rep(c(1:5),10)
v_r <- recode(v, c(1:5), c(5:1))
# character
v <- rep(c('a','b','d','e'),10)
v_r <- recode(v, c('a','b','d','e'), c('apple','1','dummy',TRUE))
# interval
set.seed(1)
v <- sample(runif(20,0,6))
# recode x <= 1.3 into 1
# recode x <= 2.6 into 2
# recode x <= 3.9 into 3
# recode x <= 5.2 into 4
# recode x > 5.1 into 5
v_r <- recode(v,c(1.3,2.6,3.9,5.2),c(1:5),cat=TRUE)
Run the code above in your browser using DataLab