| prune.Mu | R Documentation |
This function prune the center sequences Mu where the sites will be reset as GAPs if all members within the same cluster are all GAPs.
prune.Mu(X, X.class, Mu, code.type = .code.type[1])
X |
numerical data matrix with |
X.class |
class ids indicated for all sequences. |
Mu |
a center sequence with length |
code.type |
either "NUCLEOTIDE" (default) or "SNP". |
For each cluster indicated by X.class, this function will prune
Mu and reset the sites as GAPs if all members within cluster
are all GAPs. Mu are usually the returning values of
phyclust().
A pruned Mu will be returned.
Wei-Chen Chen wccsnow@gmail.com
Phylogenetic Clustering Website: https://snoweye.github.io/phyclust/
phyclust.
## Not run:
library(phyclust, quiet = TRUE)
X <- seq.data.toy$org
X[, 5] <- .nucleotide$nid[.nucleotide$code == "-"]
ret <- phyclust(X, 2)
Mu.GAPs <- prune.Mu(X, ret$class.id, ret$Mu)
ret$Mu[, 5]
Mu.GAPs[, 5] # Replace by GAPs.
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.