View source: R/set_edge_attrs.R
set_edge_attrs | R Documentation |
From a graph object of class dgr_graph
, set edge attribute values for one
or more edges.
set_edge_attrs(graph, edge_attr, values, from = NULL, to = NULL)
graph |
A graph object of class |
edge_attr |
The name of the attribute to set. Some examples are located in |
values |
The values to be set for the chosen attribute for the chosen edges. |
from |
An optional vector of node IDs from which the edge is outgoing for filtering list of nodes with outgoing edges in the graph. |
to |
An optional vector of node IDs from which the edge is incoming for filtering list of nodes with incoming edges in the graph. |
A graph object of class dgr_graph
.
Other edge creation and removal:
add_edge()
,
add_edge_clone()
,
add_edge_df()
,
add_edges_from_table()
,
add_edges_w_string()
,
add_forward_edges_ws()
,
add_reverse_edges_ws()
,
copy_edge_attrs()
,
create_edge_df()
,
delete_edge()
,
delete_edges_ws()
,
delete_loop_edges_ws()
,
drop_edge_attrs()
,
edge_data()
,
join_edge_attrs()
,
mutate_edge_attrs()
,
mutate_edge_attrs_ws()
,
recode_edge_attrs()
,
rename_edge_attrs()
,
rescale_edge_attrs()
,
rev_edge_dir()
,
rev_edge_dir_ws()
,
set_edge_attr_to_display()
,
set_edge_attrs_ws()
# Create a simple graph
ndf <-
create_node_df(
n = 4,
type = "basic",
label = TRUE,
value = c(3.5, 2.6, 9.4, 2.7))
edf <-
create_edge_df(
from = c(1, 2, 3),
to = c(4, 3, 1),
rel = "leading_to")
graph <-
create_graph(
nodes_df = ndf,
edges_df = edf)
# Set attribute `color = "green"`
# for edges `1`->`4` and `3`->`1`
# in the graph
graph <-
graph %>%
set_edge_attrs(
edge_attr = color,
values = "green",
from = c(1, 3),
to = c(4, 1))
# Set attribute `color = "blue"`
# for all edges in the graph
graph <-
graph %>%
set_edge_attrs(
edge_attr = color,
values = "blue")
# Set attribute `color = "pink"`
# for all edges in graph outbound
# from node with ID value `1`
graph <-
graph %>%
set_edge_attrs(
edge_attr = color,
values = "pink",
from = 1)
# Set attribute `color = "black"`
# for all edges in graph inbound
# to node with ID `1`
graph <-
graph %>%
set_edge_attrs(
edge_attr = color,
values = "black",
to = 1)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.