Cannot use color aes in geom_edge_bundle_force

[cisGrammar]

This code can not add color aes

library(ggraph) packageVersion("ggraph")

[1] ‘2.2.1’

ggraph(highschool) + geom_edge_bundle_force(aes(color=as.factor(year)) )

sessionInfo() R version 4.0.1 (2020-06-06) Platform: x86_64-apple-darwin17.0 (64-bit) Running under: macOS High Sierra 10.13.6

Matrix products: default BLAS: /Library/Frameworks/R.framework/Versions/4.0/Resources/lib/libRblas.dylib LAPACK: /Library/Frameworks/R.framework/Versions/4.0/Resources/lib/libRlapack.dylib

locale: [1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8

attached base packages: [1] stats graphics grDevices datasets utils methods base

other attached packages: [1] ggraph_2.2.1 ggplot2_3.5.1 colorout_1.2-2

loaded via a namespace (and not attached): [1] Rcpp_1.0.12 pillar_1.9.0 compiler_4.0.1 viridis_0.6.2 [5] tools_4.0.1 viridisLite_0.4.1 memoise_2.0.1 lifecycle_1.0.3 [9] tibble_3.2.1 gtable_0.3.5 pkgconfig_2.0.3 rlang_1.1.0 [13] tidygraph_1.2.1 igraph_1.3.0 cli_3.6.0 ggrepel_0.9.5 [17] fastmap_1.1.0 gridExtra_2.3 withr_2.5.0 dplyr_1.1.4 [21] generics_0.1.3 vctrs_0.6.5 graphlayouts_1.1.1 grid_4.0.1 [25] tidyselect_1.2.0 glue_1.6.2 R6_2.5.1 fansi_1.0.3 [29] polyclip_1.10-0 tidyr_1.3.0 purrr_1.0.1 tweenr_2.0.2 [33] farver_2.1.1 magrittr_2.0.3 scales_1.3.0 MASS_7.3-58.1 [37] ggforce_0.4.2 colorspace_2.0-3 utf8_1.2.2 munsell_0.5.0 [41] cachem_1.0.6

The bug is here in StatEdgeBundleForce0$compute_panel function you should return " cbind(edges, data[edges$group, !names(data) %in% c("x", "y", "xend", "yend", "PANEL", "group"), drop = FALSE]) "

[julianselke]

Not sure if a bug or a feature but the coloring depends on the alpha (or edge_alpha) aesthetic being set:

ggraph(highschool) +
    geom_edge_bundle_force(aes(color=as.factor(year), alpha = 0))

[schochastics]

That is for sure a bug

library(ggraph)
#> Loading required package: ggplot2

ggraph(highschool,"stress") +
    geom_edge_bundle_force(aes(color=as.factor(year), alpha = 0))

ggraph(highschool, "stress") +
    geom_edge_bundle_force(aes(color = as.factor(year)))

^{Created on 2024-07-09 with reprex v2.1.0}