euler graphics with 3 groups: problems #111
Description
There is an issue for the graphics of 3 groups with common "people"
The first coding herebelow produces the A&B (260 shown in the graphics, instead of 50 in the coding) to be smaller than the B&C (50 shown in the graphics instead of 260 in the coding)
V2<- euler(c("A" = 10000, # RACL
"B" = 1000, # RACD
"C" = 100, # RAAP
"B&C" = 250+10,
"A&C" = 30+10,
"A&B" = 40+10, # le nombre commun a deux groupes
"A&B&C" = 15)) # le nombre commun à 3 groupes
plot(V2, shape="circle",
fills=c("red3", "salmon1", "red"),
edges=list(col="blue"),
legend=list(labels=c("A", "B 2023", "C")),
labels= c("A","B", "C"),
quantities = c("A" = 10000,
"B" = 1000,
"C" = 100,
"B&C" = 260, # ???????
"A&C" = 30,
"A&B" = 50, # ?????
"A&B&C" = 15))
To solve the issue I had to invert ( in the coding of the plot) A&B and B&C, i,e: A&B is now 60 in the coding and 250 in the plot and bigger than B&C which is now 250 in the coding and 50 in the plot
fitcot2023<- euler(c("A" = 10000, # RACL
"B" = 1000, # RACD
"C" = 100, # RAAP
"B&C" = 50+15,
"A&C" = 30+15,
"A&B" = 250+15, # le nombre commun a deux groupes
"A&B&C" = 15)) # le nombre commun à 3 groupes
plot(fitcot2023, shape="circle",
fills=c("red3", "salmon1", "red"),
edges=list(col="blue"),
legend=list(labels=c("A", "B", "C")),
labels= c("A","B", "C"),
quantities = c("A" = 10000,
"B" = 1000,
"C" = 100,
"B&C" = 250, # ???????
"A&C" = 30,
"A&B" = 50, # ?????
"A&B&C" = 15))