Hi all,
I’m working with Prof. Mattia Vacchiano on The Empty Office. We’ve used Network Canvas to collect interview data and I’m now building an alter-level dataset based on these data. This is relatively new to me, so I wanted to check in here to see whether I’m on the right track before continuing.
What I have now is a dataset composed of alters with their characteristics, their egos’ characteristics, and their alter-alter ties. I’ve opted to include alter ties as binary columns in the dataset.
Below is the R code I’ve written. I’d appreciate your thoughts on the approach (especially wrt. handling aaties), anything to be improved, or blind spots I may have.
Thank you.
alter_data ← nc_data$alters
ego_data ← nc_data$egos
colnames(alter_data)[colnames(alter_data) == ‘X’] ← ‘alterX’
colnames(ego_data)[colnames(ego_data) == ‘X’] ← ‘egoX’
alter_level_noaa ← merge(alter_data, ego_data, by.x = “networkCanvasEgoUUID”, by.y = “networkCanvasEgoUUID”)
alter_edgelists ← nc_data$alter_edgelists
alter_level_data ← alter_level_noaa
all_alters ← alter_level_noaa$networkCanvasUUID
for (i in all_alters) {
alter_level_data[[i]] ← NA
}
unique_egos ← unique(alter_level_noaa$networkCanvasEgoUUID)
for (ego in unique_egos) {
alters_by_ego ← subset(alter_level_noaa, networkCanvasEgoUUID == ego)
altedges_by_ego ← subset(alter_edgelists, networkCanvasEgoUUID == ego)
for (i in 1:nrow(altedges_by_ego)) {
source_id ← altedges_by_ego$networkCanvasSourceUUID[i]
target_id ← altedges_by_ego$networkCanvasTargetUUID[i]
alter_level_data[alter_level_data$networkCanvasUUID == source_id, target_id] ← TRUE
}
sources_this_ego ← alters_by_ego$networkCanvasUUID
targets_this_ego ← alters_by_ego$networkCanvasUUID
for (s in sources_this_ego) {
for (t in targets_this_ego) {
if (is.na(alter_level_data[alter_level_data$networkCanvasUUID == s, t])) {
alter_level_data[alter_level_data$networkCanvasUUID == s, t] ← FALSE
}
}
}
}
