Skip to content

Commit

Permalink
Update summarize.r
Browse files Browse the repository at this point in the history
  • Loading branch information
zhangdb authored May 20, 2022
1 parent a2c6331 commit adf38c4
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion script/network/summarize.r
Original file line number Diff line number Diff line change
Expand Up @@ -25,6 +25,6 @@ for(freqi in freq){
edge_count <- sum(freq_count)
node <- which(freq_count!=0, arr.ind=T)
node_count <- length(unique((c(node[, 1], node[, 2]))))
cat(paste0("There are ", node_count, " genes and ", edge_count, " connections in the network with bootstrap frequency at least ", freqi, "\n"))
cat(paste0("There are ", node_count, " genes and ", edge_count, " regulations in the GRN with bootstrap frequency at least ", freqi, "\n"))
gc()
}

0 comments on commit adf38c4

Please sign in to comment.