fixed #25

gesiscss · Mar 25, 2024 · ced5f0a · ced5f0a
1 parent e2131f4
commit ced5f0a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/plot_network.R b/R/plot_network.R
@@ -287,7 +287,7 @@ plot_network <- function(data,
   # specifiying unique interactions
   NetFrame <- NetFrame[-c(is.na(NetFrame$Sender) | is.na(NetFrame$AnsweredTo)), ]
   NetFrame$Sender <- gsub(" ","_",NetFrame$Sender)
-  NetFrame$AnsweredTo <- gsub(" ","_",NetFrame$AnsweredTo) # FIXME: REMOVE THIS IF FUNCTION BREAKS
+  NetFrame$AnsweredTo <- gsub(" ","_",NetFrame$AnsweredTo)
   Interaction <- paste(NetFrame$Sender, NetFrame$AnsweredTo)
   Added_Netframe <- cbind.data.frame(Interaction, NetFrame)