dat<-c("First" = 25,
"Second" = 5,
"Third" = 5,
"First&Second" = 5,
"First&Third" = 5,
"Second&Third" = 3,
"First&Second&Third" = 3)
plot(euler(dat),
fills = list(fill=c("red","blue",
"green","darkgreen",
"white","black",
"purple"),
alpha=0.5),
quantities = list(c(25,5,5,
1,1,1,1),
col="black",
cex=4),
labels = list(col="white",font=3,cex=2),
edges = list(col="darkgreen",lwd=5,
lty=1:3))
2022-02-14
©著作权归作者所有,转载或内容合作请联系作者
- 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
- 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
- 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...