# NOT RUN {
### rank a variable
ptrafo(data.frame(y = 1:20),
numeric_trafo = function(x) rank(x, na.last = "keep"))
### dummy coding of a factor
ptrafo(data.frame(y = gl(3, 9)))
# }
Run the code above in your browser using DataLab