revised some examples for faster installation

man/causal.effect.Rd

@@ -45,13 +45,18 @@ g <- graph.formula(x -+ y, z -+ x, z -+ y , x -+ z, z -+ x, simplify = FALSE)
 # This is denoted by giving them a description attribute with the value "U"
 # The edges in question are the fourth and the fifth edge
 g <- set.edge.attribute(graph = g, name = "description", index = c(4,5), value = "U")
-causal.effect(y = "y", x = "x", G = g)
+causal.effect("y", "x", G = g)
 
 # Pruning example
 p <- graph.formula(x -+ z_4, z_4 -+ y, z_1 -+ x, z_2 -+ z_1, 
   z_3 -+ z_2, z_3 -+ x, z_5 -+ z_1, z_5 -+ z_4, x -+ z_2, z_2 -+ x, 
   z_3 -+ z_2, z_2 -+ z_3, z_2 -+ y, y -+ z_2,
   z_4 -+ y, y -+ z_4, z_5 -+ z_4, z_4 -+ z_5, simplify = FALSE)
 p <- set.edge.attribute(p, "description", 9:18, "U")
-causal.effect("y", "x", G = p, primes = TRUE, simp = TRUE, prune = TRUE)
+causal.effect("y", "x", G = p, primes = TRUE, prune = TRUE)
+
+# Simplification example
+s <- graph.formula(x -+ y, w -+ x, w -+ z, z -+ y)
+causal.effect("y", "x", G = s, simp = FALSE)
+causal.effect("y", "x", G = s, simp = TRUE)
 }

man/meta.transport.Rd

@@ -64,4 +64,3 @@ d2 <- set.vertex.attribute(d2, "description", 7:11, "S")
 d.comb <- list(d1, d2)
 meta.transport(y = "Y", x = "X", D = d.comb)
 }
-

man/recover.Rd

@@ -49,6 +49,5 @@ g <- set.edge.attribute(g, "description", 5:8, "U")
 g <- set.vertex.attribute(g, "description", 5, "S")
 
 recover(y = "Y", x = "X", G = g)
-
 }
 

man/surrogate.outcome.Rd

@@ -44,4 +44,3 @@ s <- list(
 
 surrogate.outcome(y = "Y", x = "X", S = s, G = g)
 }
-

man/transport.Rd

@@ -48,7 +48,5 @@ d <- set.edge.attribute(d, "description", 6:11, "U")
 d <- set.vertex.attribute(d, "description", 6, "S")
 
 transport(y = "Y", x = "X", D = d)
-
-
 }