# Load example data
data(egor32)
as_tibble(egor32) # Ego table.
egor32 %>%
activate("alter") %>%
as_tibble(include.ego.vars=TRUE) # Alter table, but also with ego variables.
library(srvyr)
as_survey(egor32) # Ego table with survey design.
# Despite alter table being active, obtain the ego table.
(egor32 <- activate(egor32, "alter"))
as_egos_df(egor32)
# Create global alter table
as_alters_df(egor32)
# Create global alter-alter relations table
as_aaties_df(egor32)
# ... adding alter variables
as_aaties_df(egor32, include.alter.vars = TRUE)
as_egos_survey(egor32)
as_alters_survey(egor32) # Notice the resulting cluster design.
Run the code above in your browser using DataLab