exampleSpec <-
system.file("inst",
"extdata",
"example_dct_spec_1.dct",
package="psyverse");
parsedSpecs <- load_dct_specs(exampleSpec);
dctGraph <- parsedSpecs$output$basic_graph;
dctGraph <- apply_graph_theme(dctGraph,
c("color", "#0000AA", "node"),
c("fillcolor", "#00FFFF", "node"));
Run the code above in your browser using DataLab