tests/test-03thresh.R

library("Mercator")
data("CML1000")

# transposition
bm <-t(CML1000)
bm <- removeDuplicateFeatures(bm)
summary(bm)

# run the thresher algorithm to remove "useless" vectors
thrash <- threshLGF(bm, cutoff = 0.5)
summary(thrash)

# convert back to base class
oval <- as(thrash, "BinaryMatrix")
slotNames(oval)
summary(oval)

Try the Mercator package in your browser

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

Mercator documentation built on April 6, 2019, 3:02 a.m.