R/extendr-wrappers.R

In caugi: Causal Graph Interface

# Generated by extendr: Do not edit by hand

# nolint start

#
# This file was created with the following call:
#   .Call("wrap__make_caugi_wrappers", use_symbols = TRUE, package_name = "caugi")

#' @usage NULL
#' @useDynLib caugi, .registration = TRUE
NULL

edge_registry_new <- function() .Call(wrap__edge_registry_new)

edge_registry_register_builtins <- function(reg) invisible(.Call(wrap__edge_registry_register_builtins, reg))

edge_registry_seal <- function(reg) invisible(.Call(wrap__edge_registry_seal, reg))

edge_registry_len <- function(reg) .Call(wrap__edge_registry_len, reg)

edge_registry_register <- function(reg, glyph, tail_mark, head_mark, class, symmetric) .Call(wrap__edge_registry_register, reg, glyph, tail_mark, head_mark, class, symmetric)

edge_registry_code_of <- function(reg, glyphs) .Call(wrap__edge_registry_code_of, reg, glyphs)

edge_registry_spec_of_code <- function(reg, code) .Call(wrap__edge_registry_spec_of_code, reg, code)

rs_new <- function(reg, n, simple, class) .Call(wrap__rs_new, reg, n, simple, class)

rs_clone <- function(session) .Call(wrap__rs_clone, session)

rs_set_edges <- function(session, from, to, etype) invisible(.Call(wrap__rs_set_edges, session, from, to, etype))

rs_replace_edges <- function(session, from, to, etype) invisible(.Call(wrap__rs_replace_edges, session, from, to, etype))

rs_remove_edges <- function(session, from, to, glyphs) .Call(wrap__rs_remove_edges, session, from, to, glyphs)

rs_set_n <- function(session, n) invisible(.Call(wrap__rs_set_n, session, n))

rs_set_simple <- function(session, simple) invisible(.Call(wrap__rs_set_simple, session, simple))

rs_set_class <- function(session, class) invisible(.Call(wrap__rs_set_class, session, class))

rs_resolve_class <- function(session, class) .Call(wrap__rs_resolve_class, session, class)

rs_set_names <- function(session, names) invisible(.Call(wrap__rs_set_names, session, names))

rs_compute_layout <- function(session, method, packing_ratio) .Call(wrap__rs_compute_layout, session, method, packing_ratio)

rs_compute_bipartite_layout <- function(session, partition, orientation) .Call(wrap__rs_compute_bipartite_layout, session, partition, orientation)

rs_n <- function(session) .Call(wrap__rs_n, session)

rs_is_simple <- function(session) .Call(wrap__rs_is_simple, session)

rs_simple <- function(session) .Call(wrap__rs_simple, session)

rs_class <- function(session) .Call(wrap__rs_class, session)

rs_graph_class <- function(session) .Call(wrap__rs_graph_class, session)

rs_names <- function(session) .Call(wrap__rs_names, session)

rs_names_subset <- function(session, indices) .Call(wrap__rs_names_subset, session, indices)

rs_index_of <- function(session, name) .Call(wrap__rs_index_of, session, name)

rs_indices_of <- function(session, names) .Call(wrap__rs_indices_of, session, names)

rs_edges_df <- function(session) .Call(wrap__rs_edges_df, session)

rs_codes_of <- function(session, glyphs) .Call(wrap__rs_codes_of, session, glyphs)

rs_canonical_edges <- function(session) .Call(wrap__rs_canonical_edges, session)

rs_is_valid <- function(session) .Call(wrap__rs_is_valid, session)

rs_build <- function(session) invisible(.Call(wrap__rs_build, session))

children <- function(cg, nodes, index) .Call(wrap__children, cg, nodes, index)

neighbors <- function(cg, nodes, index, mode) .Call(wrap__neighbors, cg, nodes, index, mode)

ancestors <- function(cg, nodes, index, open) .Call(wrap__ancestors, cg, nodes, index, open)

descendants <- function(cg, nodes, index, open) .Call(wrap__descendants, cg, nodes, index, open)

anteriors <- function(cg, nodes, index, open) .Call(wrap__anteriors, cg, nodes, index, open)

posteriors <- function(cg, nodes, index, open) .Call(wrap__posteriors, cg, nodes, index, open)

markov_blanket <- function(cg, nodes, index) .Call(wrap__markov_blanket, cg, nodes, index)

exogenous <- function(cg, undirected_as_parents) .Call(wrap__exogenous, cg, undirected_as_parents)

topological_sort <- function(cg) .Call(wrap__topological_sort, cg)

spouses <- function(cg, nodes, index) .Call(wrap__spouses, cg, nodes, index)

districts <- function(cg, nodes, index, all) .Call(wrap__districts, cg, nodes, index, all)

parents <- function(cg, nodes, index) .Call(wrap__parents, cg, nodes, index)

rs_is_acyclic <- function(session) .Call(wrap__rs_is_acyclic, session)

rs_is_dag_type <- function(session) .Call(wrap__rs_is_dag_type, session)

rs_is_pdag_type <- function(session) .Call(wrap__rs_is_pdag_type, session)

rs_is_ug_type <- function(session) .Call(wrap__rs_is_ug_type, session)

rs_is_admg_type <- function(session) .Call(wrap__rs_is_admg_type, session)

rs_is_ag_type <- function(session) .Call(wrap__rs_is_ag_type, session)

rs_is_mag <- function(session) .Call(wrap__rs_is_mag, session)

rs_is_cpdag <- function(session) .Call(wrap__rs_is_cpdag, session)

rs_is_mpdag <- function(session) .Call(wrap__rs_is_mpdag, session)

rs_to_cpdag <- function(session) .Call(wrap__rs_to_cpdag, session)

rs_dag_extension <- function(session) .Call(wrap__rs_dag_extension, session)

rs_meek_closure <- function(session) .Call(wrap__rs_meek_closure, session)

rs_enumerate_dags <- function(session) .Call(wrap__rs_enumerate_dags, session)

rs_count_dags <- function(session) .Call(wrap__rs_count_dags, session)

rs_skeleton <- function(session) .Call(wrap__rs_skeleton, session)

rs_moralize <- function(session) .Call(wrap__rs_moralize, session)

rs_latent_project <- function(session, latents) .Call(wrap__rs_latent_project, session, latents)

rs_exogenize <- function(session, nodes) .Call(wrap__rs_exogenize, session, nodes)

rs_normalize_latent_structure <- function(session, latents) .Call(wrap__rs_normalize_latent_structure, session, latents)

rs_induced_subgraph <- function(session, keep) .Call(wrap__rs_induced_subgraph, session, keep)

subgraph <- function(cg, nodes, index) .Call(wrap__subgraph, cg, nodes, index)

rs_d_separated <- function(session, xs, ys, z) .Call(wrap__rs_d_separated, session, xs, ys, z)

rs_minimal_separator <- function(session, xs, ys, include, restrict) .Call(wrap__rs_minimal_separator, session, xs, ys, include, restrict)

rs_m_separated <- function(session, xs, ys, z) .Call(wrap__rs_m_separated, session, xs, ys, z)

rs_not_m_separated_for_all_subsets <- function(session, node_a, node_b, other_nodes, cond_vars) .Call(wrap__rs_not_m_separated_for_all_subsets, session, node_a, node_b, other_nodes, cond_vars)

rs_adjustment_set_parents <- function(session, xs, ys) .Call(wrap__rs_adjustment_set_parents, session, xs, ys)

rs_adjustment_set_backdoor <- function(session, xs, ys) .Call(wrap__rs_adjustment_set_backdoor, session, xs, ys)

rs_adjustment_set_optimal <- function(session, xs, ys) .Call(wrap__rs_adjustment_set_optimal, session, xs, ys)

rs_is_valid_backdoor_set <- function(session, xs, ys, z) .Call(wrap__rs_is_valid_backdoor_set, session, xs, ys, z)

rs_all_backdoor_sets <- function(session, xs, ys, minimal, max_size) .Call(wrap__rs_all_backdoor_sets, session, xs, ys, minimal, max_size)

rs_is_valid_adjustment_set_admg <- function(session, xs, ys, z) .Call(wrap__rs_is_valid_adjustment_set_admg, session, xs, ys, z)

rs_all_adjustment_sets_admg <- function(session, xs, ys, minimal, max_size) .Call(wrap__rs_all_adjustment_sets_admg, session, xs, ys, minimal, max_size)

rs_shd <- function(s1, s2) .Call(wrap__rs_shd, s1, s2)

rs_hd <- function(s1, s2) .Call(wrap__rs_hd, s1, s2)

rs_ancestor_aid <- function(s_true, s_guess) .Call(wrap__rs_ancestor_aid, s_true, s_guess)

rs_oset_aid <- function(s_true, s_guess) .Call(wrap__rs_oset_aid, s_true, s_guess)

rs_parent_aid <- function(s_true, s_guess) .Call(wrap__rs_parent_aid, s_true, s_guess)

graph_builder_new <- function(reg, n, simple) .Call(wrap__graph_builder_new, reg, n, simple)

graph_builder_add_edges <- function(b, from, to, etype) invisible(.Call(wrap__graph_builder_add_edges, b, from, to, etype))

graph_builder_resolve_class <- function(b, class) .Call(wrap__graph_builder_resolve_class, b, class)

rs_compute_tiered_layout <- function(session, tier_assignments, num_tiers, orientation) .Call(wrap__rs_compute_tiered_layout, session, tier_assignments, num_tiers, orientation)

rs_write_caugi_file <- function(session, graph_class, path, comment, tags) invisible(.Call(wrap__rs_write_caugi_file, session, graph_class, path, comment, tags))

read_caugi_file <- function(path, reg) .Call(wrap__read_caugi_file, path, reg)

rs_serialize_caugi <- function(session, graph_class, comment, tags) .Call(wrap__rs_serialize_caugi, session, graph_class, comment, tags)

deserialize_caugi <- function(json, reg) .Call(wrap__deserialize_caugi, json, reg)

rs_serialize_graphml <- function(session, graph_class) .Call(wrap__rs_serialize_graphml, session, graph_class)

deserialize_graphml <- function(xml, reg) .Call(wrap__deserialize_graphml, xml, reg)


# nolint end