R/Parentselection.R

Parentselection <-
function(Type=c("tournament", "roulette", "winkler"), Tree, K=4){
  if (Type=="tournament") return(TS_Sim(Tree=Tree, K=K))
 
  if (Type=="roulette") return(Roulette_Sim(Trees=Tree))

  if (Type=="winkler")  return(Selektion_Winkler(Trees=Tree))
}

Try the NHEMOtree package in your browser

Any scripts or data that you put into this service are public.

NHEMOtree documentation built on May 2, 2019, 7:32 a.m.