split_distance_matrix_by_metadata: split_distance_matrix_by_metadata

In shihuang047/DistVis: This package can analyze and visualize distance matrix

split_distance_matrix_by_metadata

Description

split_distance_matrix_by_metadata

Usage

split_distance_matrix_by_metadata(dm, metadata, split_factor)

Arguments

dm	A squared distance matrix or a 'dist' object.
metadata	A dataframe with > two columns corresponds to samples (rownames) in the distance matrix.
split_factor	A metadata variable corresponds to samples in the distance matrix and used for splitting the distance matrix.

Author(s)

Shi Huang

Examples

set.seed(123)
x <- data.frame(rbind(t(rmultinom(7, 75, c(.201,.5,.02,.18,.099))),
            t(rmultinom(8, 75, c(.201,.4,.12,.18,.099))),
            t(rmultinom(15, 75, c(.011,.3,.22,.18,.289))),
            t(rmultinom(15, 75, c(.091,.2,.32,.18,.209))),
            t(rmultinom(15, 75, c(.001,.1,.42,.18,.299)))))
x0 <- data.frame(rbind(t(rmultinom(7, 75, c(.011,.3,.22,.18,.289))),
            t(rmultinom(8, 75, c(.011,.3,.22,.18,.289))),
            t(rmultinom(15, 75, c(.011,.3,.22,.18,.289))),
            t(rmultinom(15, 75, c(.011,.3,.22,.18,.289))),
            t(rmultinom(15, 75, c(.011,.3,.22,.18,.289)))))
y<-factor(c(rep("A", 30), rep("B", 30)))
z<-factor(c(rep("A", 20), rep("B", 20), rep("C", 20)))
metadata<-data.frame(y, z)
dm<-dist(x)
split_distance_matrix_by_metadata(dm, metadata, split_factor="y")

shihuang047/DistVis documentation built on Jan. 9, 2023, 10:39 p.m.