get.fitted.leaf {Pigengene} | R Documentation |
Taking as input a tree and data, this function determines the leaf each sample will fall in.
get.fitted.leaf(c5Tree, inpDTemp, epsi = 10^(-7))
c5Tree |
A decision tree of class |
inpDTemp |
The possibly new data matrix with samples on rows |
epsi |
A small perturbation to resolve the boundary issue |
A numeric vector of node indices named by samples (rows of inpDTemp
)
This function is tricky because C50 uses a global variable.
Amir Foroushani
Pigengene-package
,
make.decision.tree
, compact.tree
,
compute.pigengene
, module.heatmap
,
get.used.features
, preds.at
## Data: data(aml) data(mds) data(pigengene) d1 <- rbind(aml,mds) ## Fiting the trees: trees <- make.decision.tree(pigengene=pigengene, Data=d1, saveDir="trees", minPerLeaf=15, doHeat=FALSE,verbose=3, toCompact=FALSE) f1 <- get.fitted.leaf(c5Tree=trees$c5Trees[["15"]], inpDTemp=pigengene$eigengenes)