ego_homophily: Measuring Homophily in Ego Networks ('ego_homophily')

In ideanet: Integrating Data Exchange and Analysis for Networks ('ideanet')

Measuring Homophily in Ego Networks (ego_homophily)

Description

The ego_homophily function identifies how similar ego is from their alters on a given attribute.

Usage

ego_homophily(
  ego_id,
  ego_measure,
  alter_ego,
  alter_measure,
  prefix = NULL,
  suffix = NULL,
  prop = FALSE
)

Arguments

ego_id	A vector of unique ego identifiers located in an ego dataframe. If using data objects created by ego_netwrite, this should be the data frame entitled egos.
ego_measure	A vector of attributes corresponding to each ego.
alter_ego	A vector of ego identifiers located in an alter dataframe. If using data objects created by ego_netwrite, this should be the data frame entitled alters.
alter_measure	A vector of attributes corresponding to each alter
prefix	A character value indicating the desired prefix for the calculated homophily measure.
suffix	A character value indicating the desired suffix for the calculated homophily measure.
prop	A logical value indicating whether homophily should be represented as a count or as a proportion.

Value

ego_homophily returns a dataframe of vectors that include the ego identifier and the number or proportion of alters with the same selected attribute

Examples

# Run `ego_netwrite`
ngq_nw <- ego_netwrite(egos = ngq_egos,
                      ego_id = ngq_egos$ego_id,

                      alters = ngq_alters,
                      alter_id = ngq_alters$alter_id,
                      alter_ego = ngq_alters$ego_id,

                      max_alters = 10,
                      alter_alter = ngq_aa,
                      aa_ego = ngq_aa$ego_id,
                      i_elements = ngq_aa$alter1,
                      j_elements = ngq_aa$alter2,
                      directed = FALSE)


# Homophily as a Count
race_homophily_count <- ego_homophily(ego_id = ngq_nw$egos$ego_id,
                                     ego_measure = ngq_nw$egos$race,
                                     alter_ego = ngq_nw$alters$ego_id,
                                     alter_measure = ngq_nw$alters$race,
                                     suffix = "race")

race_homophily_count

# Homophily as a Proportion
race_homophily_prop <- ego_homophily(ego_id = ngq_nw$egos$ego_id,
                                    ego_measure = ngq_nw$egos$race,
                                    alter_ego = ngq_nw$alters$ego_id,
                                    alter_measure = ngq_nw$alters$race,
                                    prop = TRUE,
                                    suffix = "race")
race_homophily_prop

ideanet documentation built on June 8, 2025, 1:07 p.m.