legend venn diagram in venneuler
I would like to create a legend for a venneuler venn diagram. This should be straight forward because the function venneuler returns the colors used to the console. The colors are of a value between 0 and 1. I want to know how to turn those numberic values stored in $colors into something I can use to fill the fill argument in legend. I have attempted this below by using the $colors extracted from venneuler and indexing from colors(). I know this is not correct because colors() is indexed with interval values but put it in to show what I'd like. set.seed(20) x <- matrix(sample(0:1, 100,