``` r library(igraph) g <- make_ring(5) values <- lapply(1:5, function(x) rep(1, 2)) plot( g, vertex.shape = "pie", vertex.pie = values, vertex.pie.color = list(c("red","blue")), vertex.label = NA ) ``` <!-- --> <sup>Created on 2025-06-24 with [reprex v2.1.1](https://reprex.tidyverse.org)</sup> (fix incomming)
Created on 2025-06-24 with reprex v2.1.1
(fix incomming)