rich-iannone / DiagrammeR
Showing 60 of 122 files from the diff.
Newly tracked file
R/export_graph.R changed.
Newly tracked file
R/render_graph.R changed.
Newly tracked file
R/mutate_edge_attrs_ws.R changed.
Newly tracked file
R/set_node_attrs.R changed.
Newly tracked file
R/join_edge_attrs.R changed.
Newly tracked file
R/rev_edge_dir_ws.R changed.
Newly tracked file
R/delete_edges_ws.R changed.
Newly tracked file
R/add_edges_w_string.R changed.
Newly tracked file
R/rescale_node_attrs.R changed.
Newly tracked file
R/copy_node_attrs.R changed.
Newly tracked file
R/recode_node_attrs.R changed.
Newly tracked file
R/add_forward_edges_ws.R changed.
Newly tracked file
R/add_edge_clone.R changed.
Newly tracked file
R/set_edge_attrs_ws.R changed.
Newly tracked file
R/set_df_as_edge_attr.R changed.
Newly tracked file
R/mutate_node_attrs.R changed.
Newly tracked file
R/rename_node_attrs.R changed.
Newly tracked file
R/add_n_nodes.R changed.
Newly tracked file
R/set_edge_attrs.R changed.
Newly tracked file
R/set_node_attrs_ws.R changed.
Newly tracked file
R/node_data.R changed.
Newly tracked file
R/add_node.R changed.
Newly tracked file
R/delete_node.R changed.
Newly tracked file
R/rename_edge_attrs.R changed.
Newly tracked file
R/create_node_df.R changed.
Newly tracked file
R/add_n_node_clones.R changed.
Newly tracked file
R/edge_data.R changed.
Newly tracked file
R/set_df_as_node_attr.R changed.
Newly tracked file
R/join_node_attrs.R changed.
Newly tracked file
R/node_aes.R changed.
Newly tracked file
R/colorize_node_attrs.R changed.
Newly tracked file
R/mutate_node_attrs_ws.R changed.
Newly tracked file
R/add_n_nodes_ws.R changed.
Newly tracked file
R/recode_edge_attrs.R changed.
Newly tracked file
R/add_edges_from_table.R changed.
Newly tracked file
R/rev_edge_dir.R changed.
Newly tracked file
R/rescale_edge_attrs.R changed.
Newly tracked file
R/add_node_df.R changed.
Newly tracked file
R/create_edge_df.R changed.
Newly tracked file
R/add_node_clones_ws.R changed.
Newly tracked file
R/add_edge_df.R changed.
Newly tracked file
R/set_node_attr_w_fcn.R changed.
Newly tracked file
R/copy_edge_attrs.R changed.
Newly tracked file
R/save_graph.R changed.
Newly tracked file
R/delete_loop_edges_ws.R changed.
Newly tracked file
R/add_reverse_edges_ws.R changed.
Newly tracked file
R/delete_edge.R changed.
Newly tracked file
R/drop_edge_attrs.R changed.
Newly tracked file
R/set_node_position.R changed.
Newly tracked file
R/add_nodes_from_table.R changed.
Newly tracked file
R/delete_nodes_ws.R changed.
Newly tracked file
R/edge_aes.R changed.
Newly tracked file
R/add_edge.R changed.
Newly tracked file
R/drop_node_attrs.R changed.
Newly tracked file
R/mutate_edge_attrs.R changed.
Other files ignored by Codecov
man/edge_aes.Rd has changed.
man/save_graph.Rd has changed.
man/edge_data.Rd has changed.
man/add_edge.Rd has changed.
man/add_node.Rd has changed.
man/node_aes.Rd has changed.
man/node_data.Rd has changed.

@@ -46,7 +46,7 @@
Loading
46 46
#' #     file_name = "mypng.png",
47 47
#' #     file_type = "PNG"
48 48
#' #   )
49 -
#'
49 +
#' @family Display and Save
50 50
#' @export
51 51
export_graph <- function(graph,
52 52
                         file_name = NULL,

@@ -59,6 +59,7 @@
Loading
59 59
#' }
60 60
#'
61 61
#' @import glue glue
62 +
#' @family Display and Save
62 63
#' @export
63 64
render_graph <- function(graph,
64 65
                         layout = NULL,

@@ -114,6 +114,7 @@
Loading
114 114
#' graph %>% get_edge_df()
115 115
#'
116 116
#' @import rlang
117 +
#' @family Edge creation and removal
117 118
#' @export
118 119
mutate_edge_attrs_ws <- function(graph,
119 120
                                 ...) {

@@ -58,6 +58,7 @@
Loading
58 58
#' graph %>% get_node_df()
59 59
#'
60 60
#' @import rlang
61 +
#' @family Node creation and removal
61 62
#' @export
62 63
set_node_attrs <- function(graph,
63 64
                           node_attr,

@@ -50,7 +50,7 @@
Loading
50 50
#' # Get the graph's internal edf to show that the
51 51
#' # join has been made
52 52
#' graph %>% get_edge_df()
53 -
#'
53 +
#' @family Edge creation and removal
54 54
#' @export
55 55
join_edge_attrs <- function(graph,
56 56
                            df,

@@ -46,7 +46,7 @@
Loading
46 46
#' # Inspect the graph's edges
47 47
#' # after their reversal
48 48
#' graph %>% get_edges()
49 -
#'
49 +
#' @family Edge creation and removal
50 50
#' @export
51 51
rev_edge_dir_ws <- function(graph) {
52 52

@@ -40,7 +40,7 @@
Loading
40 40
#'
41 41
#' # Get a count of edges in the graph
42 42
#' graph %>% count_edges()
43 -
#'
43 +
#' @family Edge creation and removal
44 44
#' @export
45 45
delete_edges_ws <- function(graph) {
46 46

@@ -56,6 +56,7 @@
Loading
56 56
#' # edge data frame (it's the
57 57
#' # same as before)
58 58
#' graph_node_label %>% get_edge_df()
59 +
#' @family Edge creation and removal
59 60
#' @export
60 61
add_edges_w_string <- function(graph,
61 62
                               edges,

@@ -82,6 +82,7 @@
Loading
82 82
#' graph %>% get_node_df()
83 83
#'
84 84
#' @import rlang
85 +
#' @family Node creation and removal
85 86
#' @export
86 87
rescale_node_attrs <- function(graph,
87 88
                               node_attr_from,

@@ -51,6 +51,7 @@
Loading
51 51
#' graph %>% get_node_df()
52 52
#'
53 53
#' @import rlang
54 +
#' @family Node creation and removal
54 55
#' @export
55 56
copy_node_attrs <- function(graph,
56 57
                            node_attr_from,

@@ -74,6 +74,7 @@
Loading
74 74
#' graph %>% get_node_df()
75 75
#'
76 76
#' @import rlang
77 +
#' @family Node creation and removal
77 78
#' @export
78 79
recode_node_attrs <- function(graph,
79 80
                              node_attr_from,

@@ -53,6 +53,7 @@
Loading
53 53
#' # Get the graph's edge data frame
54 54
#' graph %>% get_edge_df()
55 55
#'
56 +
#' @family Edge creation and removal
56 57
#' @export
57 58
add_forward_edges_ws <- function(graph,
58 59
                                 rel = NULL) {

@@ -63,6 +63,7 @@
Loading
63 63
#' # Display the graph's internal
64 64
#' # edge data frame
65 65
#' graph_3 %>% get_edge_df()
66 +
#' @family Edge creation and removal
66 67
#' @export
67 68
add_edge_clone <- function(graph,
68 69
                           edge,

@@ -46,6 +46,7 @@
Loading
46 46
#' graph %>% get_edge_df()
47 47
#'
48 48
#' @import rlang
49 +
#' @family Edge creation and removal
49 50
#' @export
50 51
set_edge_attrs_ws <- function(graph,
51 52
                              edge_attr,

@@ -50,7 +50,7 @@
Loading
50 50
#'   set_df_as_edge_attr(
51 51
#'     edge = 1,
52 52
#'     df = df)
53 -
#'
53 +
#' @family Edge creation and removal
54 54
#' @export
55 55
set_df_as_edge_attr <- function(graph,
56 56
                                edge,

@@ -72,6 +72,7 @@
Loading
72 72
#' graph %>% get_node_df()
73 73
#'
74 74
#' @import rlang
75 +
#' @family Node creation and removal
75 76
#' @export
76 77
mutate_node_attrs <- function(graph,
77 78
                              ...) {

@@ -48,6 +48,7 @@
Loading
48 48
#' graph %>% get_node_df()
49 49
#'
50 50
#' @import rlang
51 +
#' @family Node creation and removal
51 52
#' @export
52 53
rename_node_attrs <- function(graph,
53 54
                              node_attr_from,

@@ -24,7 +24,7 @@
Loading
24 24
#'
25 25
#' # Get the graph's node IDs
26 26
#' graph %>% get_node_ids()
27 -
#'
27 +
#' @family Node creation and removal
28 28
#' @export
29 29
add_n_nodes <- function(graph,
30 30
                        n,

@@ -74,6 +74,7 @@
Loading
74 74
#'     to = 1)
75 75
#'
76 76
#' @import rlang
77 +
#' @family Edge creation and removal
77 78
#' @export
78 79
set_edge_attrs <- function(graph,
79 80
                           edge_attr,

@@ -47,6 +47,7 @@
Loading
47 47
#' graph %>% get_node_df()
48 48
#'
49 49
#' @import rlang
50 +
#' @family Node creation and removal
50 51
#' @export
51 52
set_node_attrs_ws <- function(graph,
52 53
                              node_attr,

@@ -23,7 +23,7 @@
Loading
23 23
#' # data attributes have been
24 24
#' # inserted
25 25
#' graph %>% get_node_df()
26 -
#'
26 +
#' @family Node creation and removal
27 27
#' @export
28 28
node_data <- function(...) {
29 29

@@ -44,7 +44,7 @@
Loading
44 44
#' # View the graph's internal
45 45
#' # node data frame (ndf)
46 46
#' graph %>% get_node_df()
47 -
#'
47 +
#' @family Node creation and removal
48 48
#' @export
49 49
add_node <- function(graph,
50 50
                     type = NULL,

@@ -68,6 +68,7 @@
Loading
68 68
#'   get_node_df()
69 69
#'
70 70
#' @import rlang
71 +
#' @family Node creation and removal
71 72
#' @export
72 73
set_node_attr_to_display <- function(graph,
73 74
                                     attr = NULL,

@@ -44,6 +44,7 @@
Loading
44 44
#'   graph_series = series,
45 45
#'   graph_no = 2)
46 46
#' }
47 +
#' @family Display and Save
47 48
#' @export
48 49
render_graph_from_graph_series <- function(graph_series,
49 50
                                           graph_no,

@@ -26,7 +26,7 @@
Loading
26 26
#' # since there were edges between the
27 27
#' # removed node to and from other nodes
28 28
#' graph %>% get_edges()
29 -
#'
29 +
#' @family Node creation and removal
30 30
#' @export
31 31
delete_node <- function(graph,
32 32
                        node) {

@@ -42,6 +42,7 @@
Loading
42 42
#' graph %>% get_edge_df()
43 43
#'
44 44
#' @import rlang
45 +
#' @family Edge creation and removal
45 46
#' @export
46 47
rename_edge_attrs <- function(graph,
47 48
                              edge_attr_from,

@@ -53,7 +53,7 @@
Loading
53 53
#'
54 54
#' # Display the node data frame
55 55
#' node_df
56 -
#'
56 +
#' @family Node creation and removal
57 57
#' @export
58 58
create_node_df <- function(n,
59 59
                           type = NULL,

@@ -44,7 +44,7 @@
Loading
44 44
#' # node data frame: nodes `4`,
45 45
#' # `5`, and `6` are clones of `1`
46 46
#' graph %>% get_node_df()
47 -
#'
47 +
#' @family Node creation and removal
48 48
#' @export
49 49
add_n_node_clones <- function(graph,
50 50
                              n,

@@ -25,7 +25,7 @@
Loading
25 25
#' # been inserted
26 26
#' graph %>% get_edge_df()
27 27
#' }
28 -
#'
28 +
#' @family Edge creation and removal
29 29
#' @export
30 30
edge_data <- function(...) {
31 31

@@ -65,7 +65,7 @@
Loading
65 65
#'   set_df_as_node_attr(
66 66
#'     node = 2,
67 67
#'     df = df_2)
68 -
#'
68 +
#' @family Node creation and removal
69 69
#' @export
70 70
set_df_as_node_attr <- function(graph,
71 71
                                node,

@@ -61,7 +61,7 @@
Loading
61 61
#' # Get the graph's internal ndf to show that
62 62
#' # this join has been made
63 63
#' graph %>% get_node_df()
64 -
#'
64 +
#' @family Node creation and removal
65 65
#' @export
66 66
join_node_attrs <- function(graph,
67 67
                            df,

@@ -68,6 +68,7 @@
Loading
68 68
#'   get_edge_df()
69 69
#'
70 70
#' @import rlang
71 +
#' @family Edge creation and removal
71 72
#' @export
72 73
set_edge_attr_to_display <- function(graph,
73 74
                                     attr = NULL,

@@ -114,7 +114,7 @@
Loading
114 114
#'     ),
115 115
#'     edge_aes = edge_aes(color = "blue")
116 116
#'   )
117 -
#'
117 +
#' @family Aesthetics
118 118
#' @export
119 119
node_aes <- function(shape = NULL,
120 120
                     style = NULL,

@@ -104,6 +104,7 @@
Loading
104 104
#'
105 105
#' @import RColorBrewer
106 106
#' @import rlang
107 +
#' @family Node creation and removal
107 108
#' @export
108 109
colorize_node_attrs <- function(graph,
109 110
                                node_attr_from,

@@ -116,6 +116,7 @@
Loading
116 116
#' graph %>% get_node_df()
117 117
#'
118 118
#' @import rlang
119 +
#' @family Node creation and removal
119 120
#' @export
120 121
mutate_node_attrs_ws <- function(graph,
121 122
                                 ...) {

@@ -72,7 +72,7 @@
Loading
72 72
#'
73 73
#' # Get the graph's edges
74 74
#' graph %>% get_edges()
75 -
#'
75 +
#' @family Node creation and removal
76 76
#' @export
77 77
add_n_nodes_ws <- function(graph,
78 78
                           n,

@@ -60,6 +60,7 @@
Loading
60 60
#' graph %>% get_edge_df()
61 61
#'
62 62
#' @import rlang
63 +
#' @family Edge creation and removal
63 64
#' @export
64 65
recode_edge_attrs <- function(graph,
65 66
                              edge_attr_from,

@@ -79,6 +79,7 @@
Loading
79 79
#'   get_edge_df() %>%
80 80
#'   head()
81 81
#' @import rlang
82 +
#' @family Edge creation and removal
82 83
#' @export
83 84
add_edges_from_table <- function(graph,
84 85
                                 table,

@@ -28,7 +28,7 @@
Loading
28 28
#' # Inspect the graph's edges
29 29
#' # after their reversal
30 30
#' graph %>% get_edges()
31 -
#'
31 +
#' @family Edge creation and removal
32 32
#' @export
33 33
rev_edge_dir <- function(graph) {
34 34

@@ -85,6 +85,7 @@
Loading
85 85
#' graph %>% get_edge_df()
86 86
#'
87 87
#' @import rlang
88 +
#' @family Edge creation and removal
88 89
#' @export
89 90
rescale_edge_attrs <- function(graph,
90 91
                               edge_attr_from,

@@ -76,7 +76,7 @@
Loading
76 76
#' # to confirm that `x` and `y` values
77 77
#' # were added to each of the nodes
78 78
#' graph %>% get_node_df()
79 -
#'
79 +
#' @family Node creation and removal
80 80
#' @export
81 81
layout_nodes_w_string <- function(graph,
82 82
                                  layout,

@@ -44,7 +44,7 @@
Loading
44 44
#' # node data frame using the
45 45
#' # `get_node_df()` function
46 46
#' graph %>% get_node_df()
47 -
#'
47 +
#' @family Node creation and removal
48 48
#' @export
49 49
add_node_df <- function(graph,
50 50
                        node_df) {

@@ -53,6 +53,7 @@
Loading
53 53
#' # Display the edge data frame
54 54
#' edf
55 55
#'
56 +
#' @family Edge creation and removal
56 57
#' @export
57 58
create_edge_df <- function(from,
58 59
                           to,

@@ -82,7 +82,7 @@
Loading
82 82
#' # edges between the selected
83 83
#' # nodes and their clones
84 84
#' graph %>% get_edge_df()
85 -
#'
85 +
#' @family Node creation and removal
86 86
#' @export
87 87
add_node_clones_ws <- function(graph,
88 88
                               add_edges = FALSE,

@@ -36,6 +36,7 @@
Loading
36 36
#' graph %>%
37 37
#'   get_edges(
38 38
#'     return_type = "vector")
39 +
#' @family Edge creation and removal
39 40
#' @export
40 41
add_edge_df <- function(graph,
41 42
                        edge_df) {

@@ -92,7 +92,7 @@
Loading
92 92
#' # Inspect the graph's internal
93 93
#' # node data frame
94 94
#' graph_3 %>% get_node_df()
95 -
#'
95 +
#' @family Node creation and removal
96 96
#' @export
97 97
set_node_attr_w_fcn <- function(graph,
98 98
                                node_attr_fcn,

@@ -45,6 +45,7 @@
Loading
45 45
#' graph %>% get_edge_df()
46 46
#'
47 47
#' @import rlang
48 +
#' @family Edge creation and removal
48 49
#' @export
49 50
copy_edge_attrs <- function(graph,
50 51
                            edge_attr_from,

@@ -30,7 +30,7 @@
Loading
30 30
#' #   open_graph(
31 31
#' #     file = "gnp_graph.dgr"
32 32
#' # )
33 -
#'
33 +
#' @family Display and Save
34 34
#' @export
35 35
save_graph <- function(x,
36 36
                       file) {

@@ -41,7 +41,7 @@
Loading
41 41
#' # Count the number of loop
42 42
#' # edges remaining in the graph
43 43
#' graph %>% count_loop_edges()
44 -
#'
44 +
#' @family Edge creation and removal
45 45
#' @export
46 46
delete_loop_edges_ws <- function(graph) {
47 47

@@ -57,6 +57,7 @@
Loading
57 57
#' # Get the graph's edge data frame
58 58
#' graph %>% get_edge_df()
59 59
#'
60 +
#' @family Edge creation and removal
60 61
#' @export
61 62
add_reverse_edges_ws <- function(graph,
62 63
                                 rel = NULL,

@@ -90,6 +90,7 @@
Loading
90 90
#'     to = "two") %>%
91 91
#'   count_edges()
92 92
#'
93 +
#' @family Edge creation and removal
93 94
#' @export
94 95
delete_edge <- function(graph,
95 96
                        from = NULL,

@@ -42,6 +42,7 @@
Loading
42 42
#' graph %>% get_edge_df()
43 43
#'
44 44
#' @import rlang
45 +
#' @family Edge creation and removal
45 46
#' @export
46 47
drop_edge_attrs <- function(graph,
47 48
                            edge_attr) {

@@ -87,7 +87,7 @@
Loading
87 87
#'
88 88
#' # View the graph's node data frame
89 89
#' graph %>% get_node_df()
90 -
#'
90 +
#' @family Node creation and removal
91 91
#' @export
92 92
set_node_position <- function(graph,
93 93
                              node,

@@ -84,6 +84,7 @@
Loading
84 84
#'   colnames()
85 85
#'
86 86
#' @import rlang
87 +
#' @family Node creation and removal
87 88
#' @export
88 89
add_nodes_from_table <- function(graph,
89 90
                                 table,

@@ -63,7 +63,7 @@
Loading
63 63
#' # get made with columns that
64 64
#' # are not character class columns
65 65
#' graph %>% get_node_df()
66 -
#'
66 +
#' @family Node creation and removal
67 67
#' @export
68 68
add_nodes_from_df_cols <- function(graph,
69 69
                                   df,

@@ -41,7 +41,7 @@
Loading
41 41
#'
42 42
#' # Get a count of nodes in the graph
43 43
#' graph %>% count_nodes()
44 -
#'
44 +
#' @family Node creation and removal
45 45
#' @export
46 46
delete_nodes_ws <- function(graph) {
47 47

@@ -117,7 +117,7 @@
Loading
117 117
#' # been inserted
118 118
#' graph %>%
119 119
#'   get_edge_df()
120 -
#'
120 +
#' @family Aesthetics
121 121
#' @export
122 122
edge_aes <- function(style = NULL,
123 123
                     penwidth = NULL,

@@ -100,6 +100,7 @@
Loading
100 100
#' # newly created edge
101 101
#' graph_2 %>% get_edge_df()
102 102
#' @import rlang
103 +
#' @family Edge creation and removal
103 104
#' @export
104 105
add_edge <- function(graph,
105 106
                     from,

@@ -41,6 +41,7 @@
Loading
41 41
#' graph %>% get_node_df()
42 42
#'
43 43
#' @import rlang
44 +
#' @family Node creation and removal
44 45
#' @export
45 46
drop_node_attrs <- function(graph,
46 47
                            node_attr) {

@@ -72,6 +72,7 @@
Loading
72 72
#' graph %>% get_edge_df()
73 73
#'
74 74
#' @import rlang
75 +
#' @family Edge creation and removal
75 76
#' @export
76 77
mutate_edge_attrs <- function(graph,
77 78
                              ...) {
Files Coverage
R 81.45%
Project Totals (244 files) 81.45%
Sunburst
The inner-most circle is the entire project, moving away from the center are folders then, finally, a single file. The size and color of each slice is representing the number of statements and the coverage, respectively.
Icicle
The top section represents the entire project. Proceeding with folders and finally individual files. The size and color of each slice is representing the number of statements and the coverage, respectively.
Grid
Each block represents a single file in the project. The size and color of each block is represented by the number of statements and the coverage, respectively.
Loading