Lines Matching refs:edf
112 edf <- graph$edges_df functionVar
115 length(values) != nrow(edf)) {
126 which(edf$to %in% to)
129 which(edf$from %in% from)
131 indices <- 1:nrow(edf)
134 which((edf$from %in% from) &
135 (edf$to %in% to))
141 if (edge_attr %in% colnames(edf)) {
143 edf[indices,
144 which(colnames(edf) %in%
148 if (!(edge_attr %in% colnames(edf))) {
152 edf <-
154 edf,
155 new_attr__ = ifelse(as.numeric(row.names(edf)) %in%
158 colnames(edf)[ncol(edf)] <- edge_attr
162 if (length(values) == nrow(edf)) {
164 if (edge_attr %in% colnames(edf)) {
165 edf[, which(colnames(edf) %in%
169 if (!(edge_attr %in% colnames(edf))) {
170 edf <-
171 cbind(edf,
172 rep(as.character(NA), nrow(edf)))
174 edf[, ncol(edf)] <-
175 edf[, ncol(edf)]
177 colnames(edf)[ncol(edf)] <- edge_attr
179 edf[, ncol(edf)] <- values
184 graph$edges_df = edf