R/createD.r

Defines functions createD

# internal functions to create random values
# discrete
createD <- function(x, q){

  qsub <- q[x,]
  qsubUQ <- unique(qsub)

  values <- sample(as.numeric(qsubUQ), length(x), replace=TRUE)
  values

}
pkuhnert/Vizumap documentation built on March 26, 2024, 3:23 a.m.