l.clust: a function to cluster a set of motifs by levenshtein...

Usage Arguments Examples

View source: R/l.clust.R

Usage

1
l.clust(set, k, plot = TRUE, method = "average")

Arguments

set
k
plot
method

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (set, k, plot = TRUE, method = "average") 
{
    d <- adist(set)
    rownames(d) <- set
    hc <- hclust(as.dist(d), method = method)
    c.ex <- ifelse(length(set) < 70, 30/length(set), 40/length(set))
    if (plot == TRUE) 
        plot(hc, xlab = "motifs", cex = c.ex)
    rect.hclust(hc, k = k)
    return(data.frame(cutree(hc, k = k)))
  }

muhligs/Regmex documentation built on Sept. 5, 2020, 1:11 a.m.