Manually sets externally/alternatively determined cluster assignment for each geneset.

# S3 method for BOWER
set_clusters(bower, clusters)

Arguments

bower

bower class

clusters

Cluster assignment for each geneset.

Value

bower class

Examples

gmt_file <- system.file("extdata", "h.all.v7.4.symbols.gmt", package = "bowerbird")
bwr <- bower(gmt_file)
bwr <- set_clusters(bwr, rep(1:5, each = 10)) # e.g. randomly make 5 blocks of 10 clusters