R/Datenpermutation_Sim.R

In NHEMOtree: Non-hierarchical evolutionary multi-objective tree learner to perform cost-sensitive classification

Datenpermutation_Sim <-
function(Daten, Vari_N){
  Daten_Perm<- Daten

  # Permutation 
    for (i in 1:Vari_N) Daten_Perm[,i+1]<- sample(Daten_Perm[,i+1])

  # Ausgabe:
    return(Daten_Perm)
}