This function subsets an epicontacts object by identifying clusters of cases connected to specified cases.

subset_clusters_by_id(x, id)

Arguments

x

an epicontacts object

id

a character vector of case identifiers; the connected components attached to these cases will be retained in the output object.

Value

An epicontacts object whose contact dataframe corresponds to all clusters containing specified case id.

Examples

if (require(outbreaks)) { ## build data x <- make_epicontacts(ebola_sim$linelist, ebola_sim$contacts, id="case_id", to="case_id", from="infector", directed=TRUE) id <- "cac51e" ## it can be a vector of id as well ## subset based on cluster to which "cac51e" belongs x_subset <- subset_clusters_by_id(x, id) }