From dcb1468381d30b385dab27193c6f3033d015c785 Mon Sep 17 00:00:00 2001
From: Niclas <richter.niclas@gmx.net>
Date: Wed, 20 May 2026 17:00:33 +0200
Subject: [PATCH] add documentation and parameter checks to the build network
 function

---
 R/build_network.R | 7 -------
 1 file changed, 7 deletions(-)

diff --git a/R/build_network.R b/R/build_network.R
index 6e606a0..567e230 100644
--- a/R/build_network.R
+++ b/R/build_network.R
@@ -135,10 +135,3 @@ compute_adj_matrix <- function(
   adj_mat
 }
 
-set.seed(1)
-X <- matrix(c(-1, -0.5, 0, 0.5, 1), nrow = 5, ncol=1)
-a <- 2.0
-v <- c(0, 0.2, 0.4, 0.6, 0.8)
-adj <- compute_adj_matrix(X, v, a, phi = function(x,y) {x * y}, 0.5, Fv = punif)
-adj
-