Latex bounds equations
latex_bounds(bounds, parameters, prob.sym = "P", brackets = c("(", ")"))
Vector of bounds as returned by optimize_effect
The parameters object as returned by analyze_graph
Symbol to use for probability statements in latex, usually "P" or "pr"
Length 2 vector with opening and closing bracket, usually c("(", ")")
, or c(" \{", "\}")
A character string with latex code for the bounds
b <- graph_from_literal(X -+ Y, Ur -+ X, Ur -+ Y)
V(b)$leftside <- c(0,0,0)
V(b)$latent <- c(0,0,1)
V(b)$nvals <- c(2,2,2)
E(b)$rlconnect <- E(b)$edge.monotone <- c(0, 0, 0)
obj <- analyze_graph(b, constraints = NULL, effectt = "p{Y(X = 1) = 1} - p{Y(X = 0) = 1}")
bounds <- optimize_effect(obj)
latex_bounds(bounds$bounds, obj$parameters)
#> [1] "\\[ \n \\mbox{Lower bound} = - P(X = 1, Y = 0) - P(X = 0, Y = 1) \n \\] \n \\[ \n \\mbox{Upper bound} = - P(X = 1, Y = 0) - P(X = 0, Y = 1) + 1 \n \\] \n"
latex_bounds(bounds$bounds, obj$parameters, "Pr")
#> [1] "\\[ \n \\mbox{Lower bound} = - Pr(X = 1, Y = 0) - Pr(X = 0, Y = 1) \n \\] \n \\[ \n \\mbox{Upper bound} = - Pr(X = 1, Y = 0) - Pr(X = 0, Y = 1) + 1 \n \\] \n"